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1.0  SCOPE 


The  purpose  of  this  volume  is  to  provide  the  reader  with  several  levels 
of  documentation  for  this  program  module  of  the  NASA  Medical  Directorate 
Mini- computer  Storage  and  Retrieval  System. 

The  Biomedical  Information  System  Overview  (Section  2)  describes  some  of 
the  reasons  for  the  development  of  the  mini-computer  storage  and  retrieval 
system«  It  briefly  describes  all  of  the  program  modules  which  constitute  the 
system. 

The  General  Specifications  Section  (Paragraph  3.1)  describes  the  purpose 
and  function  of  the  specific  program  module  documented  in  this  volume. 

The  Technical  Specifications  (Paragraph  3.2)  is  oriented  to  the  programmer. 

It  is  a technical  discussion  of  the  same  processing  described  in  general 
terms  in  the  previous  section,  but  is  a high  enough  level  as  not  to  be 
redundant  with  the  very  detailed  analysis  described  in  the  Subroutine 
Section  3.3. 

The  Subroutine  Section  (Paragraph  3.3)  describes  each  subroutine  in 
enough  detail  to  permit  an  in-depth  understanding  of  the  routines  and 
facilitate  program  modifications. 

The  Program  Utilization  Section  (Paragraph  4.0)  may  be  used  as  a 
"Users  Guide"  and  is  as  non- technical  as  possible. 
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To  eliminate  unnecessary  reproduction,  the  program  listings  are  maintained 
in  n separate  document  which  may  be  obtained  from  the  VARIAN  library  of 
computer  programs  currently  maintained  in  Building  32  at  .NASA  MSC.  In 
addition,  another  document  is  to  be  developed  for  the  Medical  Directorate 
management.  The  document  will  describe  the  mini- computer  system  on  a 
higher  functional  level  and  will  illustrate  how  the  mini- computer  storage 
and  retrieval  system  interfaces  with  the  total  directorate  data  management 
plan. 
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2.0 


BIOMEDICAL  INFORMATION  SYSTEM  OVERVIEW 


For  several  years,  the  NASA  Medical  Directorate  has  been  developing  a 
Medical  Information  Management  System  (MEDATA).  The  System, as  implemented  at 
NASA,  utilized  an  off-line  IBM  1050  for  preparation  of  data  input  via  paper  tape 
and  required  card  deck  runs  for  retrieval  of  data  from  the  data  files.  A new 
phase  of  development  has  been  implemented  utilizing  remote  terminals  and 
■rim’ computers.  Th.is  section  describes  the  development  rationale  of  the  remote 
terminal  and  mini-computer  approach. 

Several  features  of  the  old  MEDATA  system  presented  serious  difficulties  to 
the  system  user  and  made  the  system  unresponsive.  These  deficiencies  in  the 
system  included: 

© ...input  data  prepared  on  punched  paper  tape 

® No  online  data  input  capability  with  the  data  base  (i„e„,  no  remote 
data  entry) 

a Data  corrections  via  punched  paper  tape 

o Preparation  of  retrieval  requests  via  a punched  card  system 
© 48-hour  turnaround  time  required  for  retrieval  outputs. 

■To  improve  the  ,-erall  responsiveness  of  the  system  and  eliminate  these 
deficiencies,  Philco-Ford  developed  the  Varian/MEDATA  Storage  and  Retrieval  v 
System  (VMSARS)  which  utilizes  the  Varian  6201  computer  systems  in  Building 
32  or  37. 


2-1 


VMSARS  consists  of  the  Medical  Data  Input  System  (MDIS),  the  Medical  Data 
Update  System  (MDUS),  and  the  Medical  Data  Tape  Retrieval  System  (MDTRS) * 

The  Medical  Data  Input  System  (MDIS)  is  used  to  input  data  via  a CRT*  If 
updates  or  reviews  are  desired,  the  output  of  MDIS  may  be  updated  on  the 
CRT  by  the  Medical  Data  Update  System  (MDUS).  The  data  tape  (MDIS  or  MDUS 
output)  is  entered  into  the  CAAD  MEDATA  system  where  it  is  sorted  and  merged  into 
the  appropriate  Medical  Data  File.  The  updated  CAAD  MEDATA  Medical  Data  Tape 
File  is  sent  back  to  the  Varian  computer  system  and  used  as  input  for  the 
Medical  Data  Tape  Retrieval  System  (MDTRS)  which  processes  data  retrieval 
requests  from  remote  terminal s.  The  primary  advantages  of  the  VMSARS  are 
as  follows: 

e Use  of  state-of-the-art  input  devices  such  as  CRT's  and  portable 

acoustic-coupled  teleprocessing  terminals*  (CRT's  operate  at  2400  bits 
per  second  on  the  telephone  lines*) 

® Elimination  of  paper  tapes  from  the  system*  (Data  storage  is  on 
magnetic  tape.) 

\ 

© Online  data  input  from  remote  input  station  via  the  telephone  lines* 

® Error  correction  capabilities  on  CRT.  (Limited  error  checking  is 
performed  by  the  computer. ) 

V 

© Update  capabilities  on  Varian  system  before  data  is  entered  into  the 
CAAD  MEDATA  system* 
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e Ease  of  creation  and  updating  of  background  forms. 

o Capability  of  transmitting  MEDATA  retrievals  over  telephone  lines 
to  CRT  or  TTY. 

• Capability  of  performing  online  retrievals. 

VMSARS  was  used  for  the  Flight  Crew  Health  Stabilization  Program  for 
three  months  preceding  the  launch  of  Apollo  14  and  Apollo  15.  A Computer 
Communications  Inc.  (CCI)  CRT  and  keyboard  and  an  Execuport  Typewriter 
were  installed  in  the  surveillance  command  post  at  KSC , and  a surveillance 
master  file  was  created.  The  VMSARS  was  used  to  collect  data,  perform 
updates,  and  retrieve  data  from  the  surveillance  master  file. 

The  overall  system,  including  the  CAAD  MEDATA  system  interface,  is 
illustrated  in  Figure  2-1.  The  individual  programs  are  described  as  follows: 

MEDICAL  DATA  INPUT  SYSTEM 


The  Medical  Data  Input  System  (MDIS)  is  designed  to  collect  data  from  a CRT 
input  station  and  store  the  data  on  a magnetic  tape.  The  medical  question- 
naire forms  are  maintained  on  magnetic  tape  and  are  read  into  computer 

V 

memory  at  run  time.  The  user  selects  the  appropriate  form  to  be  displayed 
on  the  CRT.  As  each  form  is  completed,  the  data  is  stored  on  magnetic  tape. 
This  tape  may  be  further  updated,  transmitted  to  another  terminal,  or 
input  to  the  1108  MEDATA  system.  Hardcopies  of  any  form  are  produced  at  the 
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user's  request „ The  system  requires  only  one  tape  unit  and  operates  either 
via  the  phone  lines  or  directly  online  with  the  computers 
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MEDICAL  DATA  UPDATE  SYSTEM 


The  Medical  Data  Update  System  (MDUS)  updates  any  tape  created  by  MDISo 
Two  tape-drives,  a CRT,  and  printer  are  required.  The  old  data  is  read 
from  the  MDIS  output  tape  and  displayed  on  the  CRT.  Changes  may  be  made 
to  the  data  on  the  CRT;  comments  or  recommendations  may  be  added  to  the 
record,  and  the  new  updated  record  written  to  the  update  tape.  The  updated 
tape  may  be  either  transmitted  to  another  terminal  or  input  to  the  MEDATA 
system,  or  both.  Hardcopies  of  the  records  are  produced  if  requested  by 
the  user.  Refer  to  Figure  2-3  for  an  illustration  of  the  MDUS  components. 


medical  data  tape  RETRIEVAL  SYSTEM  (MDTRS) 


MDTKS  permits  the  user  to  make  data  retrievals  from  the  MEDATA  master 
tapes  created  by  the  1108  MEDATA  system.  The  1108  system  builds  the  MEDATA 
master  tape  from  several  sources,  one  of  which  is  the  MD1S  or  MDUS  created 
input  tapes.  MDTRS  outputs  preprogrammed  retrieval  questions  from  the 
Varian  computer  to  the  requester's  CRT  or  typewriter.  The  user  builds  his 
retrieval  request  by  answering  these  questions.  When  the  retrieval  request 
is  complete,  MDTRS  searches  the  MEDATA  master  tape  for  the  data,  formats  the 
selected  data  for  output,  and  outputs  the  data  to  the  terminal.  The  CRT  may 
operate  on  a private  telephone  line  at  2000  bits  per  second  and  the  type- 
writer operates  on  any  commercial  telephone  line  at  300  bits  per  second. 

Refer  to  Figure  2-4  for  an  illustration  of  MDTRS  components. 

2.1  OVERVIEW  SUMMARY 

In  summary,  the  Varian/MEDATA  Storage  and  Retrieval  System  provides  the  user 
with  an  online  input  and  retrieval  capability  previously  unavailable.  The 
response  time  is  significantly  improved  over  the  old  paper  tape  system.  There 
are  still  two  weak  points  in  the  system  due  to  hardware  constraints.  These 
are  (1)  the  requirement  to  update  the  MEDATA  master  file  on  the  CAAD  1108 
computer  system,  and  (2)  the  use  of  tape  instead  of  disk  for  storage  of  the 
data  base.  A more  comprehensive  storage  and  retrieval  system  is  being 
designed  to  operate  on  a Varian  620  mini-computer  system  utilizing  a disk 
memory  storage  device  and  an  input/output  multiplexing  device.  The  new 
system  will  permit  immediate  update  of  files,  faster  response  for  retrieval 
requests  and  multiple  terminal  users  operating  simultaneously.- 
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REMOTE  COMMUNICATIONS 
STATION 


VAR1AN  6201  COMPUTER  SYSTEM 
BUILDING  32 


MEDATA  SYSTEM 
BUILDING  12 


PRIVATE  LEASED  LINE  2400  BPS 


FUNCTIONS 

• INPUT 

• UPDATE 

• RETRIEVE  ON  SOCIAL 
SECURITY  NUMBER, RECORD 
AND  TYPE 

• RECEIVE  MEDATA 
RETRIEVAL  OUTPUT 


TAPE 
DRIVE 
NO,  1 


• DISPLAY  BACKGROUND  FORMS  ON  REMOTE  OR 
LOCAL  CRT 

• COLLECT  INPUT  DATA  FROM  REMOTE  OR  LOCAL  CRT 
o UPDATE  DATA  AND  BACKGROUND  FORMS 

• TRANSMIT  ANY  RETRIEVAL  FROM  ML'DATA  SYSTEM 
o RETRIEVE  VIA  CRT  OR  TTY 

• MERGE  COLLECTED  DATA  TAPES  IF  NECESSARY 


MASTER  FILES 


INPUT  TO  MEDATA 


TAPE 
DRIVE 
NO.  2 


dSD 


MEDATA 

UNIVAC  1108  SYSTEM 


OUTPUT  FROM 
MEDATA  RETRIEVALS 


RETRIEVAL 

REQUESTS 


FUNCTIONS 

• ACCEPT  INPUT  FROM  VARIAN  TAPE 

• RETRIEVE  VIA  CARD  INPUT  . 

• MAINTAIN  FILES,  SORT,  MERGE,  ETC; 
OUTPUT  UPDATED  MASTER  FILES 

• OUTPUT  RETRIEVAL  TAPES  FOR  VARIAN 


Figure  2-1  Varian/MEDATA  Storage  and  Retrieval  System 


Figure  2-2  Medical  Data  Input  System 
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Figure  2-4  Medical  Data  Tape  Retrieval  System  (MDTRS) 
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This  document  describes  in  detail  one  of  the  three  components  of  VMSARS, 
the  Medical  Data  Tape  Retrieval  System  (MDTRS). 
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3.0  MDTRS  SYSTEM 


3.1  GENERAL  SPECIFICATIONS 

3.1.1  Background 

After  the' input  system  (MDIS)  and  the  update  system  (MDUS)  were  implemented 
in  the  latter  part  of  1970  at  the  Manned  Spacecraft  Center,  it  became  ap- 
parent that  a retrieval  system  on  the  Varian  6201  computer  would  be  a 
worthwhile  complement  to  the  overall  storage  and  retrieval  operations  at 
MSC.  At  the  time,  all  retrievals  were  done  in  a batch  processing  environ- 
ment which  did  not  lend  itself  to  the  near- real- time  requirements  of 
certain  individuals  in  the  Medical  Directorate.  Once  they  had  identified 
the  types  of  information  they  required  from  the  data  base,  these  scientists 
and  doctors  were  not  at  all  satisfied  with  the  twenty- four  hour  delay  that 
was  necessary  before  they  could  receive  their  data.  Thus,  at  the  start  of 
1971,  work  began  on  the  Medical  Data  Tape  Retrieval  System  (MDTRS)  which 
was  modeled  after  the  system  used  in  the  batch  processing  environment. 

The  principle  difference  was  to  be  in  the  use  of  a computer  dedicated  to 
retrieving  data  from  a master  file,  and  operated  either  locally  at  the 
computer  or  from  a remote  station  over  an  ordinary  telephone  line.  On 
July  1,  1970,  it  was  implemented. 

The  MDTRS  permits  a user  to  retrieve  specific  information  from  his  data 
base.  What  information  is  selected,  and  the  format  in  which  it  is  output, 
is  determined  by  the  request  the  user  submits  via  a keyboard  connected  to 
the  computer.  There  are  a number  of  different  types  of  outputs  the  user 
may  specify,  as  well  as  a limited  amount  of  statistical  information  on  the 


3.1.1  Background  (Continued) 

During  the  twenty-one  day  preflight  quarantine  of  Apollo  15,  the  MD1RS 
got  its  first  real  test  in  the  Flight  Crew  Health  Stabilization  Program. 

In  order  to  minimize  the  possibility  of  any  prime  crew  member  contacting 
a disease,  all  persons  coming  in  contact  with  the  crew  during  this 
quarantine  period  were  put  under  medical  surveillance.  Personal  and 
family  medical  information  was  collected  on  each  individual.  This  informa- 
tion was  available  for  retrieval  via  the  MDTRS  as  any  need  arose.  Rapid 
access  to  the  data  base  and  the  statistics  the  retrieval  system  provides 
were  the  key  components  of  the  surveillance  program  which  is  planned  for 
use  in  all  remaining  Apollo  missions. 

3.1.2  Functions  of  the  System 

In  order  to  understand  any  further  discussion  concerning  the  MDTRS, 
several  terms  should  first  be  defined. 

r 

operator  - the  individual  who  loads  the  computer  with  the  programs 
necessary  for  operation  of  the  MDTRS 
user  - the  individual  who  wishes  to  retrieve  data,  and  will 

operate  the  local  or  remote  station  that  controls  the 
MDTRS 

request  - a set  of  seven  questions  and  answers  completed  by  the 
user  at  his  station,  which  direct  the  MDTRS  in  its 
operation 

response  (request  response)  - answers  to  the  seven  questions  of  the 
request;  keyed  in' by  the  user  at  his  station 
retrieval  - all  inputs,  outputs,  and  processing  necessary  to  fulfill 
all  phases  of  a user- input  request 


3.1 . 2. 1 Input 


Input  to  the  HDTRS  Is  of  two  types: 

(1)  keyboard  manual  data  entries,  and 

(2)  magnetic  tape  master  file  data  input. 

Keyboard  entries  are  made  both  by  the  operator  and  the  user0  Operator 
entries  define  the  computer  location  and  the  user  input  device.  User 
inputs  are  in  the  form  of  request  responses.  All  processing  is  done  on 
these  inputs  or  the  data  tape  inputs  described  in  detail  in  Appendix  A. 

3. 1.2. 2 Processing 

A request  specifies  three  things:  (1)  identification  of  the  record  or  records 

to  be  dealt  with,  (2)  what  portion  of  that  record  to  be  output,  and  (3)  what 
format  to  be  used  for  output.  Once  this  request  has  been  input  and  validated, 
the  data  tape  is  searched  for  the  record  identified.  The  specified  output  is 
then  begun.  Processing  continues  until  all  requested  data  has  been  output, 

-or  until  the  user  aborts  the  retrieval. 

3. 1.2. 3 Output 

Two  types  of  output,  magnetic  tape  or  printed  pages,  are  available  with  the 
HDTRS.  Tape  output  is  used  to  make  a duplicate  of  portions  of  the  master 
file.  This  may  be  helpful  when  many  retrievals  are  to  be  done  using  the 
same  small  portion  of  the  data  over  and  over  again.  The  printed  output 

V 

applies  to  all  or  a portion  of  a record  and  may  be  in  several  formats. 
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3.2  TECHNICAL  SPECIFICATIONS 


3.2.1  System  Description 

The  HDTRS  can  be  divided  into  four  functional  modules:  Initialization,  Request, 

Record  Match,  and  Output.  Each  module  plays  a critical  role  in  the  successful 
operation  of  all  succeeding  modules.  7 

I/O  Device  Selection 

Retrieval  Definition 

Record  Selection 

Data  Formatting  and 
Output 


C 

INITIALIZATION 

0 

N 

REQUEST 

T 

R 

RECORD  MATCH 

0 

L 

OUTPUT 

3.2.2  Input 

There  are  three  types  of  input  data  used  in  the  MDTRS:  operator  initialization 
data,  user  request  data,  and  master  tape  date.  The  first  type  is  used  during 
Initialization  when  three  questions  concerning  the  computer  configuration  are 
answered  via  the  system  input  device,  the  teletype.  These  three  answers  tell 
(1)  on  what  computer  configuration  the  system  is  running,  (2)  what  device  is 
to  be  used  for  user  input  and  output,  and  (3)  on  what  unit  (10  or  11)  the  Master 
File  is  mounted. 


After  Initialization  the  MDTRS  is  ready  to  accept  the  user's  inputs.  These 
inputs  define  the  retrieval  to  be  performed,  and  make  up  the  data  input  for 
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the  Request  module,,  There  are  seven  questions  that  must  be  answered  and 
they  are:  / 

o SS  NO: 

© RECORD:  , 

o TYPE: 

• DATE  . . ....... 

© CONDITION: 

» ACTION:  « 

e WHAT: 

The  first  five  questions  identify  a specific  record  from  the  master;  the  Last 
question  defines  what  portion  of  that  record  is  to  be  output;  and  the  sixth 
question  specifies  the  output  format.  There  exist  strict  rules  for  the 
input  of  request  data.  These  rules  are  stated  in  Section  4 of  this  document. 


Appendix  A details  the  exact  layout  of  the  Master  File  and  the  records  on 
the  file. 

/ 

3.2.3  Processing 
Initialization 

The  first  thing  done  after  the  system  is  loaded  into  the  computer  is  the 
initialization  of  all  I/O  handlers  based  on  the  computer  configuration  and 
the  location  of  the  user  terminal.  This  initialization  includes  inserting 
the  correct  device  codes  into  the  input/output  instructions  and  inserting 
any  other  device-dependent  coding  necessary  for  proper  interface  with  all 
peripheral  devices.  All  routines  using  the  I/O  handlers  are  to  assume  that 
the  primary  input  and  output  device  is  a teletype.  The  appropriate  handlers 
will  take  the  necessary  action  with  special  characters. 
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Request 

In  the  Request  module,  the  seven  questions  of  the  Retrieval  Request  are 
processed  separately.  In  each  case,  there  is  a limited  amount  of  erro 
checking.  This  is  done  to  prevent  a retrieval  from  being  rendered  useless 
after  several  minutes  of  processing,  due  to  some  error  in  the  format  of  a 
user's  inputs  which  makes  it  impossible  to  determine  what  he  actually 
wants.  Each  question  is  checked  for  a blank  response.  In  this  event 
there  is  one,  the  default  response  can  be  assumed  for  each  question. 

These  default  responses  are: 


e 

SS  NO:  ALL 

o 

RECORD:  ALL 

9 

TYPE:  ALL 

9 

DATE:  ALL 

5 

CONDITION:  NONE 

0 

ACTION:  LIST 

O 

WHAT:  ALL 

As  a Request  Response  is  processed,  it  is  placed  in  a buffer  called  the 
Request  Buffer  (CPRB).  In  the  Request  Table  (CPRT),  the  beginning  location 
of  each  response  is  saved  and  used  later  by  the  Record  Match  and  the  Output 
modules. 

V 

o Record  Match 

Once  all  responses  have  been  successfully  input,  the  tape  is  searched  for 

a record  that  matches  the  selection  criteria  (the  first  five  questions)  of 

the  Request.  The  processing  in  the  Record  Match  module  is  relatively  simple  for 
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the  first  four  questions.  These  make  up  the  ID  section  of  the  record 
(see  Appendix  A).  In  most  cases  a straight  comparison  can  be  made 
between  the  Request  Response  in  the  Request  Buffer  and  a fixed  area 
of  the  Tape  Input  Buffer.  If  the  two  are  exact,  the  match  is  true. 

However,  the  response  to  CONDITION  may  have  Boolean  operators,  which 
allow  the  user  to  specify  complex  conditions.  These  responses  are  made  up 
of  Headings  and  Answers  from  the  Body  Section  of  a record.  In  the  Request 
module,  the  response  to  CONDITION  was  placed  in  the  Request  Buffer,  and  a 
tree  network  was  created  to  facilitate  easy  and  rapid  determination  of 
the  logical  conclusion  of  the  Boolean  expression  in  this  response.  The 
Headings  and  Answers  make  up  the  base  of  the  tree.  In  the  Record  Match 
module,  as  each  Heading-Answer  pair  is  matched,  a flag  is  set  that  allows 
the  program  to  proceed  further  up  the  tree  from  the  base.  Once  the  top  of 
the  tree  is  reached,  the  Boolean  expression  is  true.  If  the  expression  is 
true,  the  record  is  said  to  match  the  CONDITION  response. 

Output 

A record  is  selected  when  the  first  five  questions  of  the  selection  criteria 
of  the  Request  are  fulfilled.  The  sixth  question  specifies  the  format  of 
the  output.  The  appropriate  routine  is  called  and  collects  the  data 
specified  by  the  response  to  the  WHAT  question.  As  soon  as  enough  data  for 
one  line  of  output  is  collected,  the  Output  Message  routine  (OMOO)  is  called. 
This  routine  selects  the  necessary  output  handler,  based  on  the  operator  input 
data  of  the  Initialization  module.  When  all  the  requested  data  on  the  record 
is  processed,  control  is  again  passed  to  rhe  Record  Match  module  which  searche 
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for  another  record  to  match  the  selection  criteria  of  the  Request. 

End  Action  / 

Three  things  will  terminate  the  retrieval  processing:  ; 

(1)  the  SS  NO  on  record  exceeds  the  one  specified  in  the  Request; 

(2)  the  end  of  the  tape  data  (end-of- file)  is  reached;  and 

(3)  the  user  elects  to  abort  the  retrieval  from  his  remote  station. 

Each  Output  subroutine  in  the  Output  module  has  some  specific  action  that 
must  be  performed  in  the  event  one  of  the  above  events  occurs.  Once  this 
action  is  completed,  control  is  transferred  to  the  Request  module  and  the 
processing  begins  again. 

3.2.4  Output 

There  arc  thdee  types  of  output  in  the  MDTRS:  user  I/O  device  output,  system 

I/O  device  output,  and  user- requested  tape  output.  The  three  types  will  fall 
into  one  of  three  categories: 

(1)  user- requested  output  may  go  to  either  tape  or  the  user  I/O  device; 

(2)  error  messages  may  go  to  the  system  or  user  I/O  devices; 

(3)  advisory  messages  may  go  to  the  user  I/O  device  during  retrievals, 
or  to  the  system  I/O  device  during  initialization. 

The  user  I/O  device  may  be  any  one  of  the  following: 

(1)  CLINC  Teletype  #1 

(2)  CLINC  Teletype  #2 

(3)  DOC  Teletype 

(4)  103A  Modem 

The  system  I/O  device  is  the  Teletype  in  all  cases. 


Examples  of  user- requested  output  may  be  found  in  Appendix  J.  These 
outputs  are  in  one  of  four  ACTION  formats: 

(1)  LIST 

(2)  COUNT 

(3)  COPY 

(4)  TABULATE /ANALYZE. 

3.2.5  Buffers  and  Tables 

The  function  of  the  Request  module  is  to  accept  the  user's  inputs,  save  the 


responses  in  the  Request  Buffer  (CPRB) , and  organize  a set  of  buffers  and 
tables  that  will  be  used  in  the  remaining  two  modules  of  the  MDTRS.  To 
completely  comprehend  the  processing  done  in  the  last  two  modules,  these 
buffers  and  tables,  and  their  interrelationships  must  be  fully  understood. 
Appendices  B through  G define  the  layout  of  each  of  the  specific  buffers  of 
concern  in  the  Request  module. 


Request  Buffer  and  Table 

In  Figure  3-1,  there  is  a diagram  showing  the  relationship  between  the 
Request  Table  and  the  Request  Buffer.  All  Request  responses  are  placed  in 
the  Request  Buffer,  with  the  starting  addresses  of  the  first  four  saved  in 
the  Request  Table.  Should  any  Request  question  not  have  a response,  a zero 
placed  in  the  position  of  the  Request  Table  associated  with  that  response. 
This  zero  indicates  the  Default  Condition  for  that  question. 


is 


V 


Operand  Buffer  - simple  response 

For  the  response  to  CONDITION,  one  of  two  situations  may  exist:  a complex 

response  with  Boolean  operators  or  a simple  response  without  Boolean  operators 
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Figure  3-2  is- a buffer  diagram  for  the  simple  response.  In  this  example,  the 
first  location  in  the  Operand  Buffer  contains  the  beginning  location  of  the 
CONDITION  response.  The  second  location  contains  a -1  to'  indicate  that  there 
are  no  more  parameters  in  the  response. 

Condition  Table  . 

Each  simple  response  may  be  one  of  four  forms! 

(1)  Heading  only  - flag  =0; 

(2)  Heading  plus  alpha  Answer  - flag  = 1; 

(3)  Heading  plus,  numeric  Answer  - flag  = 2; 

(4)  Heading  plus  range  of  numeric  Answer  - flag  = 3. 

To  signify-  which  form  each  simple  response  may  be,  a table  (Condition  Table) 
has  been  created  containing  a flag  to  signify  the  form  of  the  response,  and  a 
pointer  to  locate  the  answer  associated  with  each  simple  response.  In  the 
sample  in  Figure  3-2,  the  flag  is  two,  indicating  a Heading  with  a numeric 
Answer.  The  pointer  is  next  in  the  table  and  locates  the  Answer  in  the  Request 

Buffer. 

\ 

Bool  Buffer  and  Operand  Buffer  - complex  response 

A complex  response  is  a series  of  simple  responses  separated  by  the  Boolean 
operators  AND  and  OR,  and  possibly  grouped  using  parentheses  as  required.  ^ 

Figure  3-3  is  an  example  of  the  buffer  arrangement  associated  with  a complex 
response.  The  Operand  Buffer  is  now  a series  of  two  word  sets  - the  first 
word  of  the  set  contains  a pointer  to  the  Heading  portion  of  the  simple  response 
in  the  Request  Buffer;  the  second  word  contains  a pointer  .to  the  Boolean  operator 
associated  with  that  simple  response.  Every  simple  response  of  the  Operand 
Buffer  is  linked  to  an  operator.  This  operator  is  located  in  the  Bool 


3-10 


Buffer  and  may  link  to  other  operators  in  the  Bool  Buffer  depending  on  the 
dcf-,  3e  of  complexity  of  the  CONDITION  response. 

what  Table 

The  responses  to  the  question  WHAT  are  handled  in  exactly  the  same  manner 
as  the  CONDITION  responses,  with  the  exception  that  the  What  Table  is  used 
in  place  of  the  Condition  Table. 

fbe  '-A/A  ujw  response  results  in  a flag  being  set  in  the  sixth  location  of 
. the  Request  Table.  For  a list  of  these  flags  and  their  meanings  see 
Ar^eiidix  B. 
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SS  NO:  123-45-6789* 
RECORD:  REPORT* 

TYPE:  MEDICAL  BACKGROUND* 
DATE:  07MAY71* 

CONDITION:  * 

ACTION:  * 

WHAT:  * 


REQUEST  REQUEST 

TABLE  BUFFER 


FIGURE  3-1  BUFFER  DIAGRAM  FOR  SS  NO, 

RECORD,  TYPE,  AND  DATE  RESPONSES 
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SS  NO:  * 

RECORD:  * 

TYPE:  * 

DATE:  * 

CONDITION:  TEMP: IOO* 
ACTION:  * 

WHAT:  * 


REQUEST  OPERAND  REQUEST 

TABLE  BUFFER  BUFFER 


FIGURE  3-2  BUFFER  DIAGRAM  FOR  SIMPLE 
CONDITION  RESPONSE 
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SS  NO:  * 

RECORD:  * 

TYPE:  * 

HATE:  * / 

CONDITION:  TEMP:  100  AND  HIGH  IIP:  POS* 
ACTION:  * 

WHAT:  * 


REQUEST  OPERAND  REQUEST 

TABLE  BUFFER  BUFFER 


FIGURE  3-3  BUFFER  DIAGRAM  FOR  COMPLEX 
CONDITION  RESPONSE 
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3.2.6  System  Flow 


© 


ISOO 


INITIALIZE 
\ SYSTEM 


RQOO 


INPUT  USER 
< REQUEST  & SET 
\UP  BUFFERS  & 


\ TABLES 


. YES 

PROCESS  : 

END  ACTION  ; 

1 
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3.2,7  Hardware  Configuration 

Following  is  a minimum  hardware  configuration  for  operation  of  the  MDUS; 

1 - Varian  620/i  computer  with  20K  of  core  memory 

2 - tape  drives 
1 - teletype 

3 - Buffer  Interlace  Controllers  (BIC) 

1 - Priority  Interrupt  Module  with  the  following  interrupts. 

End  of  Transmission  interrupts  on  all  BIC's 
CRT  keyboard  interrupt 
1 - 103A  Modem 

The  two  tape  drives  should  be  connected  to  separate  BIC's, 

3,2.o  System  Block  Diagram 
See  Figure  3-4. 
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USER  TERMINAL 


INITIALIZATION  REQUEST  RECORD  MATCH  OUTPUT 


PROCESSING  < 

SETUP  I/O  FOR 
SPECIFIC  TERMINAL 
USE 

INPUT  AND 
PROCESS  USER 
REQUEST 

-s> 

MATCH  USER- 
INPUT  REQUEST 
TO  MASTER 
RECORD 

SELECT  PROPER 

PROCESSING 

PROGRAM 

■ -■  ■ ..  — 

<■ 

FIGURE  3-4  MDTIIS  SYSTEM  BLOCK  DIAGRAM 


3.3  SUBROUTINES 


3.3.1  B1.00  - Setup  Boolean  Tree 

i ■ 

3. 3.1.1  Purpose 

The  purpose  of  the  subroutine  is  to  set  up  a tree  network  for  CONDITION 
and  WHAT  responses,  which  can  be  used  to  facilitate  rapid  matching  of  data. 

3.3. 1.2  Technical  Description 

A thorough  knowledge  of  both  the  Operand  Buffer  and  the  Bool  Buffer  is 
necessary  for  a complete  understanding  of  the  BLOO  routine.  Appendices  C 
and  D detail  the  layout  of  these  buffers.  Before  any  explanation  is  made 
of  the  processing,  a few  definitions  are  necessary. 

a stack  functions  as  a last  in  - first  out  storage  mechanism. 
Physically  the  stack  constitutes  a data  table.  There  is 
a pointer  designating  the  current  end  of  stack.  Whenever 
an  item  is  taken  from  the  stack,  it  is  the  last  item  that 
had  been  inserted.  An  item  may  be  added  to  the  stack  or 
removed  from  the  stack.  To  stack  an  item  means  to  insert 
the  item  in  the  location  indicated  by  the  pointer  and 
then  increment  the  stack  pointer. 

V 

to  pop  (or  remove)  an  item  from  the  stack  is  to  decrement  the 
stack  pointer  and  then  remove  the  item  indicated  by  the 
pointer. 


DEFINITIONS 

stack 


pops tack 


3-20 


link 


pointer 


atom 


simple  operand 


complex  operand 


operator 


terminal 


parameter 


this  is  a function  whereby  two  arguments  (or  parameters) 
are  associated  by  having  the  first  argument  point  to  the 
second. 

a pointer  is  merely  an  address  of  the  location  of  some 
specific  item  in  memory. 

the  smallest  element  of  an  operand  in  a Boolean  expression. 
In  the  case  of  the  MDTRS,  an  atom  represents  one  Heading 
or  one  Heading-Answer  pair. 

an  atom  to  the  left  or  right  of  the  operator  in  a Boolean 
expression. 

a simple  Boolean  expression  made  up  of  an  operator  and  two 
operands  (simple  or  complex),  the  expression  itself  to  be 
used  as  an  operand  in  another  Boolean  expression. 

symbol  representing  a Boolean  function  of  either  union  or 
intersection. 

the  last  call  to  BLOO  indicating  the  end  of  the  Boolean 

V 

expression,  is  the  terminal  parameter  call. 

an  element  that  makes  up  the  Boolean  expression.  It  may 
be  one  of  the  following: 

(1)  left  parenthesis 

(2)  right  parenthesis 
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(3)  atom  (simple  operand) 

(4)  operator 

(5)  terminal. 

node  a collection  of  memory  locations  containing  the 

data  necessary  to  determine  the  logical  conclusion  of 
a simple  Boolean  expression  and  the  link  to  the  next 
level  of  the  expression.  See  Appendix  C. 


conclusion  the  logical  occurrence  of  an  operand  or  expression,  whereby, 

if  X occurs,  X union  Y is  true;  or  if  Y occurs,  X union  Y is 
true;  both  X and  Y must  occur  for  X intersection  Y to  be 
true. 

BASIC  PROCESSING 

There  are  five  types  of  parameters  in  a legal  Boolean  expression  in  MDTRS 
(see  definition  of  parameter).  BLOO  processes  the  entire  expression  one 
parameter  at  a time.  Each  type  of  parameter  has  its  own  specific  processing 
which  is  composed  of  some  combination  of  the  following  three  functions: 
inserting  an  item  onto  a stack,  removing  an  item  from  the  stack,  or  linking 
two  items  together.  V 

For  use  with  the  stack  operations  two  stacks,  A and  B,  are  maintained  in 
the  MDTRS.  Stack  A contains  items  that  are  to  be  linked  to  the  next  operator 
in  the  Boolean  expression.  These  items  may  be  simple  operands  or  operators 
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representing  complex  operands.  Stack  B contains  left  parentheses  and 
operators  that  will  be  linked  to  by  the  next  simple  operand  or  complex 
operand. 


ALGORITHM 


The  algorithm  for  the  processing  of  the  parameters  contains  five  segments, 
one  for  each  type  of  parameter.  The  algorithm  will  be  listed  here  and  will 
be  followed  by  an  example  of  its  use. 


1.  JTeft  parenthesisj  . Stack  B (left  parenthesis) 


2.  fright  parenthesiT]  . If  Popstack  B = left  parenthesis,  continue. 
Otherwise  Link  (Popstack  A to  Popstack  B)„ 


3.  Jatomj  . If  Popstack  B empty  or  left  parenthesis.  Stack  A (atom)  and 
Stack  B (left  parenthesis).  Otherwise  Link  (atom  to  Popstack  B) 

4.  £op  | Link  (Popstack  A to  operator),  Stack  A (op)  and  Stack  B (op) 


5.  |terminaij . a)  If  Popstack  B is  empty  Link  (Popstack  A to  NULL). 

b)  Otherwise,  if  Popstack  B is  left  parenthesis,  Go  to  a.  c)  Otherwise 
Link  (Popstack  A to  Popstack  B)  and  Go  to  a. 
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X f|  (YIJZ) 


Figure  B-r>  11  lust  rate's  four  different  Boolean  t roes  thnl  can  be  set  up  by 
this  algorithm.  In  Figure  3-6  there  is  a step  by  step  example  of  the 
algorithm.  In  each  portion  of  the  figure  you  c an  see  the  parameter  that 
is  being  processed,  the  contents  of  each  stack  after  the  processing,  and  the 
new  links,  if  any,  between  operand  and  operator.  The  links  are  illustrated 
by  arrows,  and  the  direction  of  the  link  by  the  direction  of  the  arrow. 

Initially,  both  Stacks  A and  B are  empty  and  there  are  no  links  between 
parameters.  - 

a.  The  left  parenthesis  is  the  parameter  and  it  is  added  to  Stack  B„ 
Eventually,  this  left  parenthesis  will  be  removed  by  a right 
parenthesis.  However,  it  is  saved  to  prevent  the  linking  of 

any  atom  within  the  parenthesis  to  an  operator  outside  the 
parenthesis. 

b.  The  next  parameter  is  an  atom,  X.  Stack  B is  popped.  If  the  last 
item  on  B is  a left  parenthesis,  this  atom  is  the  atom  to  the  left 
of  the  operator.  Since  the  atom  to  the  left  is  always  linked  to 
the  operator  immediately  following,  X will  be  saved  in  Stack  A and 
will  wait  for  the  operator  that  is  to  follow.  It  is  important  that 
the  left  parenthesis  that  was  removed  from  Stack  B be  replaced, 
since  we  have  not  yet  found  the  right  parenthesis  that  will 
remove  it  permanently. 


c.  With  this  operator, A,  we  will  create  our  first  link.  The 
last  item  on  Stack  A is  popped.  This  item  is  the  atom  X which 
has  been  waiting  for  the  operator.  The  first  link  is  set  by 
linking  X to  the  operator  A.  We  must  now  add  the  operator  to 
both  stacks.  It  is  added  to  B because  it  is  waiting  for  the 
next  simple  or  complex,  operand  which  will  link  to  A . The 
operator  is  added  to  A because  represents  a complex  operand 
(X  Y),  and  must  be  linked  to  an  operator  as  all  operands  must. 

d.  Our  next  parameter  is  an  atom  Y.  Stack  B is  popped  and  since 
the  operator  A has  been  waiting  for  the  operand  Y,  Y is  linked 
to  A . Looking  at  the  links  we  can  see  that  we  have  a complete 
expression  X r\  Y„  This  expression  is  used  as  a complex  operand 
m cue  expression  U ft  t x., 

e.  The  right  parenthesis  is  found  now.  This  means  that  our  simple 
expression  X Y has  been  completely  linked  and  there  is  no  danger 

of  illegal  linking  of  the  parameters  that  were  within  the  parentheses 
In  some  cases,  when  the  Boolean  expression  consists  of  many  nested 
expressions  (e.g.,  ((XOY)nz)U  (RH(SUT)))  the  last  item  on 
Stack  B will  not  be  the  left  parenthesis  that  must  be  removed.  In 
this  event,  the  terminal  processing  will  remove  them.  However,  in 
our  example  here  the  left  parenthesis  is  the  last  item  and  is  removed 
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f.  The  next  parameter  is  the  operator  U.  At  any  time  we  have 

an  operator  we  will  also  have  an  operand  (simple  or  complex) 
on  Stack  A.  Thus,  we  link  Stack  A to  the  operator  U . Then 
1J  is  placed  on  both  stacks;  on  Stack  B to  wait  for  the  next 
operand,  and  on  Stack  A because  it  represents  a complex  operand 
(in  this  case  the  entire  expression)  that  must  be  linked  to  an 
operator.  . 

g.  The  last  operand  is  now  received.  It  is  immediately  linked  to 
the  operator  on  Stack  B. 

h„  There  are  no  more  parameters  but  we  have  some  cleaning  up  to  do 
in  our  stacks.  This  is  done  by  examining  Stack  B.  If  B is  empty 
we  must  link  the  item  on  Stack  A to  NULL  (A).  This  null  link 
indicates  the  _tog  of  the  Boolean  tree.  If  B had  not  been  tmpty 
the  last  item  on  A would  have  been  linked  to  the  last  item  on  B 
and  the  next  item  on  B would  have  been  examined  as  before. 
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3. 3. 1.2.1  Calling  Sequence 


CALL  BLOO 

REGISTER 

A 


B 


X 

Overflow 


CONTENTS  UPON  ENTRY  CONTENTS  UPON  EXIT 

Parameter  to  be  processed: 

1 = left  parenthesis 

2 = right  parenthesis  N/A 

3 = operator 

4 = atom  (operand) 

5 = terminal 

link  location  in  operand 

buffer  if  A-reg  =4  N/A 

type  of  operator  0 = OR 

1=  AND  .. 

if  A-reg  = 3 

N/A  N/A 

N/A  N/A 


CALL 


SAOO 


KEG I S'lKK 
A 
B 
X 

Overflow 


CONTENTS  UPON  ENTRY, 
item  to  be  added  to  Stack  A 
N/A 
N/A 
N/A 


CONTENTS  UPON  EXIT 
N/A 
N/A 
N/A 
N/A 


- CALL  SBOO 


REGISTER 

A 

B 

X 

Overflow 


CONTENTS  UPON  ENTRY 
item  to  be  added  to  Stack  B 
N/A 
N/A 
N/A 


CONTENTS  UPON  EXIT 
N/A 
N/A 

*>T  / A 
/ n 

N/A 


CALL  PAOO 


REGISTER 

A 

B 

X 

Overflow 


CONTENTS  UPON  ENTRY 
N/A 
N/A 
N/A 
N/A 


CONTENTS  UPON  EXIT 
item  removed  from  Stack  A 


N/A 

N/A 

N/A 
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CALL 


PBOO 


REGISTER 

A 

B 

X 

Overflow 


CONTENTS  UPON  ENTRY 
N/A 
N/A 
N/A 
N/A 


CONTENTS  UPON  EXIT 
item  removed  from  Stack  B 
N/A 
N/A 
N/A 


CALL  LKOO,  LKA,  LKB 


PARAMETER 

LKA 

LKB 


FUNCTION 

location  where  pointer  is  to  be  stored 
pointer  to  be  stored. 


REGISTER 

A 

B 

X 

Overflow 


CONTENTS  UPON  ENTRY 
N/A 
N/A 
N/A 
N/A 


CONTENTS  UPON  EXIT 
N/A 
N/A 
N/A 
N/A 
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3. 3. 1.2. 2 General  Flow  Chart 


/ 

/ 
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3. 3. 1.3  Label  Description 

3. 3. 1.3.1  Local 

BLA  First  argument  in  call  to  LKOO 

BLB  Second  argument  in  call  to  LKOO 

BLSA  Stack  A Buffer 

BLSV  Save  location 

BLXA  Stack  A Pointer 

BLXB  Stack  B Pointer 

BLSB  Stack  B Buffer 

LKA  First  argument  in  call 

LKB  Second  argument  in  call 

3. 3. 1.3. 2 Global 
None 

3. 3. 1.3. 3 Entry  Points 
BLOO 

LKOO 

PAOO 

PBOO 

SAOO 

SBOO 
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3.3.1c3«4  External  References 


CPXB 

$SE 


Bool  Buffer  pointer 

routine  to  pick  up  a calling  sequence 


3. 3. 1.4  Detailed  Flow  Chart 


LEFT 

PARENTHESIS 


RIGHT 

PARENTHESIS 


OPERATOR 


OPERAND 
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BL10 
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3-37 


3-38 


3-40 


3-41 


STORE  CONTENTS 
OF  A-, REGISTER 
IN  NEXT  AVAIL- 
ABLE LOCATION 
IN  STACK  A 


INCREMENT  STACK 
A POINTER 
(BLXA) 
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/ 


PBOO 


3- 


PICK  UP  LAST 
AVAILABLE  VALUE 
IN  STACK  A 
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3.3.2  CDOO  - Convert  Date 


3. 3. 2.1  Purpose 

CDOO  is  a subroutine  whose  purpose  is  to  take  a month  which  is  stored  in 
the  Tape  Input  Buffer  in  integer  form  and  convert  that  number  to  a 
corresponding  three  character  alpha  equivalent  and  store  it  into  a 
buffer  for  later  processing. 

3.3. 2. 2 Technical  Description 

CDOO  picks  up  the  integer  number  corresponding  to  the  month  from  the 
Tape  Input  Buffer.  Using  the  integer  as  an  index,  the  corresponding 
three  alpha  character  entry  in  the  Month  Conversion  Table  CDTB  is  accessed 
and  output,  a character  at  a time,  by  calling  the  pack  routine  PK01  three 
times  in  succession.  If  the  value  of  the  integer  is  greater  than  15,  an 
entry  of  'UNK'  is  assigned.  The  Month  Conversion  Table  CDTB  is  given  in 
Figure  3-7  . 

3.3.2. 2.1  Calling  Sequence 


CALL  CDOO 

REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

Contents  unpredictable 

B 

N/A 

Contents  unpredictable 

X 

N/A 

N/A 

Overflow 

N/A 

N/A 
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MONTH  CONVERSION  TABLE  (CDTB) 


/ 


/ 


Integer 

0 

1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 
>15 


Alpha  Equivalent 

UNK  (unknown) 

JAN 

FEB 

MAR 

APR 

MAY 

JUN 

JUL 

AUG 

SEP 

UNK 

UNK 

UNK 

OCT 

NOV 

DEC 

UNK 


Figure  3-7 
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3.3. 2. 2. 2 General  Flow  Chart 
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3. 3. 2. 3  Label  Description 

3.3. 2. 3.1  Local 

CDTB  - A 48  word  table  containing  the  alpha  designation  for  each  month 
of  the  year.  In  addition,  space  has  been  allocated  for  those 
additional  entries  which  are  to  be  designated  as  'LINK'  (i.e.,  unknown) 

3. 3. 2. 3. 2 Global 
None 

3.3. 2.3.3  Entry  Point 
CDOO  - primary  entry  point 

1 ‘ < ' 

3.3. 2.3.4  External  References 
PK01  - pack  character  routine 
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3.3.2c4  Detailed  Flow  Chart 
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CD 

05 


/ 

/ 
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3.3.3  CMOO  - Compare 


3. 3. 3.1  Purpose 

CMOO  is  a subroutine  whose  purpose  is  to  compare  two  strings  of 
alphanumeric  characters. 


3.3. 3. 2 Technical  Description 

Starting  locations  of  the  two  strings  of  alphanumeric  characters  to  be 
compared  are  passed  to  the  routine  via  the  A and  B registers.  CMOO 
then  does  a word  by  word  compare  on  the  two  character  strings.  If  the 
two  strings  are  identical,  control  is  returned  to  the  calling  program 
with  a zero  in  the  A- register;  otherwise  a non  zero  value  is  stored  in 
the  A- register.  The  two  alphanumeric  character  strings  are  assumed  to 
be  the  same  length. 


3. 3. 3. 2.1  Calling  Sequence 
CALL  CMOO 


REGISTER 

A 


CONTENTS  UPON  ENTRY 
beginning  location  of  first 
data  value 


CONTENTS  UPON  EXIT 
zero  if  values  equal, 
otherwise,  unpredictable 


B 


beginning  location  of  second  unpredictable 

data  value 


X 

Overflow 


Number  of  characters  to  compare 
N/A 


unpredictable 

N/A 
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3. 3. 3. 2. 2 General  Flow  Chart 
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3. 3. 3. 3 Label  Description 

/ 

/ 

3„3.3.3ol  Local 

AVAL  storage  location  containing  the  beginning  address  of  one 

of  the  values  to  be  compared 


BVAL  storage  location  containing  the  beginning  address  of  the 

second  value  to  be  compared 

3. 3*  3. 3. 2 Global 
N/A 

3.3.3.3»3  Entry  Points 
CMOO  - primary  entry  point 

3. 3. 3. 3. 4 External  References 
N/A 
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3;3.3.4  Detailed  Flow  Chart 


3.3.4  CPOO  - Control  Prop  ram 


3. 3. 4.1  Purpose 

The  purpose  of  CPOO  is  to  control  the  execution  of  all  processing  and 
input/output  routines.  In  this  manner,  CPOO  provides  a modular  system 
which  simplifies  development,  checkout,  and  maintenance  of  the  software,, 

3. 3. 4.2  Technical  Description 

CPOO  initializes  the  system  by  calling  the  Initialize  System  Routine  ISOO, 
rewinding  the  input  tape,  and  clearing  the  request  buffers*  The  Request 
User  Input  (RQOO)  routine  is  executed  to  accept  the  retrieval  request  from 
the  user.  The  data  tape  is  read  by  the  Magnetic  Tape  Handler  (HMOO)  and 
the  Record -Match  Routine  (RMOO)  is  executed*  If  a record  match  occurs, 

CP°°  caUs  the  appropriate  format  routine  LIST,  COPY,  COUNT,  TABULATE  OR 
ANALYZE.  When  a tape  end  of  file  or  a request-greater- than-master- record 
condition  occurs,  the  appropriate  wrap-up  routine  for  the  requested  output 
format  is  executed  and  the  "OUTPUT  COMPLETE"  message  is  displayed.  The 
next  request  is  then  accepted  by  the  RQOO  routine  again.  If  no  matches  are 
found,  the  entire  file  will  be  searched  (except  when  "GREATER  THAN"  condition 
on  control  data  occurs)  and  the  only  output  to  the  requestor  terminal  will  be 
the  "OUTPUT  COMPLETE"  message. 

If  the  user  aborts  the  retrieval  in  progress,  the  messages  "RETRIEVAL  ABORTED" 
and  "OUTPUT  TERMINATED"  are  displayed  after  the  appropriate  wrap-up  routine 
has  been  executed. 

3.3.4. 2. 1 Calling  Sequence 


None 


3o4„2*2  General  Flow  Chart 
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3. 3. 4. 3 Label  Description 


3. 3. 4. 3. 1 Local 

CPAF  Abort  Flag 

CPBK  Backspace- constant  value  6 

CPCU  Maximum  number  of  words  to  be  read  from  tape;  value  2880 

CPEA  End  function;  Indicator  for  What  Format  Wrap-up  Routine  to  call. 

CPFU  Function  Table;  Indicator  for  What  Format  Routine  to  callo  See 
Table  2 in  3. 3.4. 2 for  details. 

CPMC  Table  containing  addresses  of  processing  to  be  done  for  each  of  the 
three  record  match  conditions,  low,  equal,  or  greater. 

CPRD  Tape  read  function  code  of  0 

CPRW  Tape  function  code  of  7 

CPTE  Tape  read  error  count  ; 

CPTP  Table  containing  addresses  of  processing  to  be  done  for  each  of  the 
possible  tape  status  codes  returned  by  the  tape  handler  HM00. 

i 

3. 3.4. 3. 2 Global 

CPBB  Bool  buffer;  40  words  in  length;  See  Appendix  F for  details; 
Referenced  by  RQ00,  RC00 

CPNC  Number  of  characters  in  retrieval  question.  Referenced  by  RQ00. 

CPOB  Operator  buffer;  40  words  in  length;  See  Appendix  D for  detail 

referenced  by  RQ00,  RC00 

CPRB  Request  buffer;  480  words  in 'length;  See  Appendix  E for  details; 
Referenced  by  RQ00,  RS00 
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3o3s4„3.2  Global  (Continued) 

CPRT  Request  Table;  See  Appendix  B for  details;  Referenced  by  RQOO,  RSOO, 
RROO,  and  RDDO,  RCOO,  RAOO,  RMOO,  MDOO,  MCOO,  MWOO,  CTOO,  TAOO,  LIOO 
CPTB  Tape  buffer,  2880  words  in  length;  See  Appendix  A for  layout, 
referenced  by  RAOO,  MAOO,  LIOO,  CYOO,  CTOO,  TA00o 
CPSW  Status  Word  for  user  I/O  devices  Number  of  characters  input  or  output 
referenced  by  RQOO,  RSOO,'  RROO,  RAOO  and  CYOO 
CPTS  Tape  status  set  to  negative  value  when  abnormal  condition  arises, 

set  to  positive  value  is  the  number  of  words  written,  referred  by  CYOO 
CPWT  What  Buffer;  20  words  in  length;  See  Appendix  G for  detail,  referenced 
by  RQOO,  RCOO 

CPXB  Bool  buffer  pointers  Referenced  by  RQOO,  RCOO 

CPXC  Condition  buffer  pointer,  referenced  by  RQOO,  RCOO 

CPXO  Operand  buffer  pointer,  referenced  by  RQOO,  RCOO 

CPXR  Request  buffer  pointer,  referenced  by  RQOO,  RSOO,  RROO,  RDOO 

3s3s4.3»3  Entry  Point 
N/A 

3.3.403.4  External  References 
CTOO  Subroutine  to  COUNT 

CT10  Subroutine  ENTRY  POINT  to  close  COUNT  subroutine 

CYOO  Subroutine  to  Copy  Data  Tape  ^ 

CY20  Subroutine  ENTRY  POINT  to  Close  Copy  subroutine 
CYOO  Subroutine  to  Copy  Data  Tape 
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3.3.4. 3. A External  References  (Continued) 

CYZO  Subroutine  ENTRY  POINT  to  Close  Copy  subroutine 

EROO  Subroutine  to  Output  Message  to  User 

FILL  Subroutine  to  Clear  Buffer 

HMOO  Subroutine  to  handle  the  input  tape 

ISOO  Subroutine  to  initialize  the  program 

LIOO  Subroutine  to  output  LIST 

LI$7  Subroutine  to  close  ENTRY  POINT  LIST  subroutine 

OMHC  Defined  in  OMHC;  Header  switch,  clear  to  zero;  CPOO  at  end  of 

the  retrieval 

RMOO  Subroutine  to  match  record  buffer  with  request  buffer 

RQOO  Subroutine  to  accept  request  data  from  the  user 

TAAO  Subroutine  ENTRY  POINT  to  close  TABULATE  subroutine 

TAA1  Subroutine  ENTRY  POINT  to  close  ANALYZE  subroutine 

TAOO  Subroutine  to  tabulate  and  analyze 
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3. 3. 4. 4 Detailed  Flow  Chart 


CALL  ISOO 
INITIALIZE 
SYSTEM 


-N 


CALL  HMOO 
REWIND 
INPUT  TAPE. 


CALL  FILL' 
ZERO  CONTROL 
.BUFFER 


CALL  RQOO 
REQUEST 
USER  INPUT 


CALL  EROO 
OUTPUT 
.RETRIEVAL  IN, 


. PRQGR 


i£S_ 


CALL  CPC A \ 
CHECK  ABORT 


LOAD  CPTE  WITH  - 
NO.  OF  TIMES  TO 
REREAD  TAPE 


CALL  HMOO 
READ  TAPE 


CPOO 
PAGE  1 
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CPOO 
PAGE  A 
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CPOO 
PAGE  5 
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3.3.5  CTOO  Count 


/ • 

3. 3.5.1  Purpose 

CTOO  is  a subroutine  whose  purpose  is  to  count  the  number  of  records 
whenever  "COUNT"  is  specified  as  the  answer  to  the  "ACTION"  query.  The 
Subroutine  will  only  count  those  records  which  meet  the  criteria  specified 
in  the  response  to  the  "WHAT"  query. 

3.3.5. 2 Technical  Description 

The  subroutine  checks  the  What  entry  in  the  Request  Table.  If  the  entry 
is  zero,  the  default  value  of  "count  all  records"  is  assumed.  If  the 
entry  is  non- zero,  only  those  records  that  meet  the  'What'  response 
criteria  are  counted.  To  determine  if  the  record  meets  the  'What'  response 
criteria,  the  subroutine  Match  What  (MWOO)  is  called  to  check  all  question/ 
answer  pairs  in  tape  input  buffer. 

If  the  entry  meets  the  specified  criteria,  the  counter  (CTCT)  is  incremented. 
When  an  End  of  File  is  encountered  by  the  Control  Program,  CPOO,  control  is 
given  to  the.  entry  point  CT10.  The  count  is  converted  from  binary  to  ASCII, 
displayed  on  the  output  device  and  the  counter  (CTCT)  cleared  to  zero. 

Control  is  then  returned  to  CPOO. 

V 
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3. 3.5. 2.1  Calling  Sequence 
CALL  CTOO 
CALL  CTIO 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

Modified 

B 

N/A 

Modified 

X 

N/A 

Modified 

Overflow 

N/A 

Modified 

V 
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3«3o5o 2„ 2 General  Flow  Chart 
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3<>3.5.3  Label  Description 

/ • • 

3«3.5.3ol  Local 

CTMS  Message  Display  'Count  Is' 

CTNO  Four  Work  Areas  used  to  convert  the  count  to  ASCII 
CTOC  Display  Count 

CTQN  Question  number  to  be  checked  by  Match  What 
CTST  Status  Word  / 

3.3.5. 3.2  Global 

CTCT  Binary  Count  used  also  by  CYOO 

3. 3. 5. 3. 3 Entry  Points 
CTOO  Count  the  Records 
CT10  Output  the  Count 

3. 3. 5. 3. 4 External  References 

CPRT  Defined  in  Appendix  B,  Request  Table 

CPTB  Defined  in  Appendix  A,  Tape  Buffer.  Second  word  in  buffer 

contains  number  of  questions  in  buffer 
MWOO  Subroutine  Match  What 

0M00  Subroutine  to  output  count  to  User  Terminate 
PKOO  Subroutine  to  Initialization  Pack  Output  Count 

PK01  Subroutine  to  Pack  Count 
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V 


CTOO 
PAGE  2 
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3.3.6  CYOO  - COPY  Data 

3. 3. 6.1  Purpose 

Copy  is  a subroutine  whose  purpose  is  to  copy  data  from  the  input 
file  whenever  "COPY"  is  specified  as  the  response  to  "ACTION"  query. 

3. 3. 6. 2 Technical  Description 

The  Copy  Subroutine  initializes  the  output  unit  number  based  on  the 
current  assignment  of  the  input  unit  number.  A message  to  the  computer 
operator  requesting  that  a tape  be  mounted  is  generated.  The  computer 
operator  responds  with  a 'G'  when  the  tape  is  mounted.  The  tape  mount 
message  is  repeated  until  the  operator  responds  with  a 1 G * ; subject  to 
a maximum  repetition  of  fifty  times  in  which  case  a message,  'NO  RESPONSE 
FROM  COMPUTER  OPERATOR,  REQUEST  CANCELLED',  is  displayed  at  the  user 
terminal. 

After  the  computer  operator  responds,  the  firdt  record  is  written  and 
the  counter  (CTCT)  is  set  to  one.  Thereafter  each  time  CYOO  is  entered, 
the  record  just  read  by  the  control  program  (CPOO)  is  written  to  the  output 
tape  and  the  counter  (CTCT)  incremented. 

When  an  End  of  File  is  encountered  by  CPOO,  control  is  given  to  CY20. 

CY20  writes  a software  End  of  File  and  hardware  End  of  File.  The  output 
count  CTCT  is  displayed  to  the  user  terminal  and  the  computer  operator 
is  requested  to  dismount  the  tape.  Control  is  returned  to  the  control 


3.3.6. 2.1  Calling  Sequence 


CALL  CYOO 

CALL  CY20 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

Modified 

B 

N/A 

Modified 

X 

N/A 

Modified 

Overflow 

N/A 

Modified 
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3. 3. 6. 3. 2 


Global 


None 

3. 3. 6. 3. 

CYOO 

CY20 

3. 3. 6.3 

CPCA 

CPTB 

CPTS 

CP20 

CTCT 

CTIO 

HMOO 

IS90 

OMOO 


3 Entry  Points 
COPY  TAPE 

WRITE  END  OF  FILE 

4 External  References 
Subroutine  to  check  for  abort 
Defined  in.  Appendix  A Tape  Buffer 

Defined  in  CPOO;  number  of  characters  to  be  written 

Transfer  control  when  abort 

Defined  in  CTOO,  counter 

Subroutine  to  output  count  to  user 

Subroutine  to  write  to  tape  . 

Subroutine  to  output  message  to  computer  operator 
Subroutine  to  output  message  to  user 
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3. 3. 6. 4 Detailed  Flow  Chart 


ZERO  CYSW, 
CYC1 


/ CALL  IS90  \ 
OUTPUT  MOUNT 
v MESSAGE  , 


LOAD  REGX 
32767 


f CALL  CY50 
WAIT  FOR 
RESPONSE 


^ NO 
RESPONSE 


RESPONSE'- 

(G) 


CYOO 
PAGE  1 
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CYOO 
PAGE  3 


3-81 


CYOO 
PAGE  5 


3.3.7  EROO  - Output  Message 


3. 3. 7.1  Purpose 

EROO  is  a subroutine  whose  purpose  is  to  output  error  or  advisory 
messages  to  the  user  at  the  terminal. 

3. 3. 7. 2 Technical  Description 

Whenever  an  error  occurs  or  status  information  is  to  be  output,  subroutine 
EROO  is  employed  to  select  the  proper  message  from  table  ERTB  and  output 
it.  Register  X is  used  as  an  index  into  ERTB  to  indicate  the  message 
desired  to  be  output.  The  address  of  the  start  of  the  message  is  retrieved 
and  stored  in  the  call  to  OMOO,  which  outputs  the  message. 

3.3.7. 2.1  Calling  Sequence 
CALL  EROO 

CONTENTS  UPON  EXIT 
Modified 
Same 

Modified 


REGISTER 


CONTENTS  UPON  ENTRY 


A 

B 

X 


N/A 

N/A 

Number  of  Message  to 
be  displayed 


Overflow 


N/A 


Same 


3. 3.7. 2. 2 General  Flow  Chart 
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3. 3. 7. 3 Label  Description 


3.3.7. 
ERCT 
ERTB 

ERRO 

ERR1 

ERR2 

ERR3 

ERR4 

ERR5 

ERR6 

ERR7 

ER08 

ER11 

ER12 

ER13 

ER14 

ER15 

ER16 

ER17 

ER18 

ER19 

3.3.7. : 
None 


3.1  Local 

contains  24  for  number  of  characters  to  be  output. 

is  the  table  of  address  for  messages.  The  table  has  20  entries. 

Each  entry  specifies  the  address  of  the  first  character  of  the  message. 
'INVALID  SS  NO' 

'INVALID  RECORD'  ‘ 

'INVALID  TYPE' 

'INVALID  DATA' 

'INVALID  CONDITION' 

'INVALID  ACTION' 

'INVALID  WHAT' 

'CANNOT  ANALYZE  PROSE'  - 

'ILLEGAL  PARENTHESIS' 

'RECORD  BAD- SKIPPED 1 
'NO  ANSWER  WITH  COLON' 

'TOO  MANY  PARAMETERS'  . ' 

’INVALID  WHAT' 

'POWER  FAILURE,  PLEASE' 

'RESTART  REQUEST*******' 

'RETRIEVAL  WORKING' 

'RETRIEVAL  ABORTED' 

'OUTPUT  TERMINATED' 

V 

3.2  Global 
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3. 3.7. 3. 3 Entry  Point 
EROO 

3. 3. 7. 3. 4 External  References 

CPOC  is  output  message  in  CPOO  'OUTPUT  COMPLETE' 

CPET  is  output  message  in  CPOO  'TAPE  ERROR  RECORD  SKIP 

OMOO  call  to  output  the  message. 
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3.3.7<>4  Detailed  Flow  Chart 


3.3.8  FAOO 


FLOATING  POINT  - ASCII  Conversion 


3. 3. 8.1  Purpose 

The  purpose  of  the  subroutine  FAOO  is  to  translate  a floating  point 
number  from  its  internal  representation  to  alpha  codes  into  a buffer 
for  subsequent  printout. 

3. 3. 8. 2 Technical  Description 

The  overall  approach  used  to  encode  the  floating  point  number  utilizes  the 
Varian-provided  subroutine  ($HS)  which  converts  floating  point  numbers  to 
binary  integers.  $HS  is  obviously  subject  to  the  limitation  of  32,767;  i.e., 
the  maximum  integer  that  may  be  represented  in  the  620i.  The  maximum  number 
of  characters  permitted  to  be  encoded  excluding  the  decimal  point  is  7. 

The  integer  part  and  fractional  part  of  the  floating  point  number  are 
encoded  separately.  The  integer  part  of  the  number  to  be  encoded  is  compared 
with  the  upper  limit  of  32,767;  should  it  exceed  .the  maximum,  it  is  divided 
by  1,000,  resulting  in  a quotient  equal  to  the  n significant  digits  greater 
than  1,000.  The  resulting  floating  point  integer  is  converted  to  binary 
integer  via  $HS.  The  resulting  binary  integer  is  then  encoded  to  a string 
of  ASCII  characters.  The  integer  part  of  the  number  which  is  less  than 
1,000  is  then  converted  to  a binary  integer  via  $HS  and  subsequently  convert- 
ed to  its  ASCII  equivalent. 


If  a fractional  part  exists,  the  decimal  point  is  inserted  and  the 
fractional  part  is  multiplied  by  10,000  to  make  it  an  integer.  The 
conversion  process  used  for  the  integer  part  is  then  utilized  for  the 
fractional  part  also.  A second  multiplication  by  10,000  of  the  remain 
ing  portion  of  the  fractional  number  may  be  necessary  to  acquire  the 
remaining  digits. 

3.3.8. 2.1  Calling  Sequence 
CALL  FA00 

REGISTER  CONTENTS  UPON  ENTRY  CONTENTS  UPON  EXIT 

A Most  signification  part  of  Modified 

number  to  be  converted. 


B 

Least  significant  part  of 
number  to  be  converted. 

Modified 

X 

Address  when  to  store  result. 

Modified 

Overflow 

N/A 

Modified 

3. 3.8. 2. 2 General  Flow  Chart 


FAOO 
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3. 3. 8.3  Label  Description 


3.3.8. 

FABF 

FACT 

FADG 

FADX 

FAH1 

FAH2 

FAMX 

FAON 

FARA 

FARB 

FARD 

FATH 

FATN 

FATP 

FASW 

3.3.8. 

None 

3.3.8. 

FAOO 


' / ■ " ' 

3.1  Local 

Binary  working  storage  used  to  convert  integer 

Counter 

Digit  counter 

Address  of  buffer  to  store  result 

Working  storage  for  high  order  floating  point  number 
Working  storage  for  low  order  floating  point  number 
Floating  Point  number  32,767.0 
Floating  Point  number  1.0 

Most  significant  part  of  number  to  be  converted 
Least  significant  part  of  number  to  be  converted 
Floating  Point  number  .5  x 10"7 
Floating  Point  number  1000,0 
Floating  Point  number  10,000.0 

5 word  working  storage  used  to  convert  to  ASCII  code 
Switch  used  to  tell  if  a leading  zero  is  present 

t.  2 Global 
.3  Entry  Points 
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3. 3.8. 3. 4 External  References 


PKOO 

PRO  l 

SIGN 

$HS 

$QL 

$QM 

$QN 

$QS 


Subroutine  entry  point  to  pack  first  character  in  output  buffer. 
Subroutine  entry  point  to  pack  character  in  output  buffer. 
Subroutine  to  copy  sign. 

Subroutine  to  convert  floating  point  number  to  binary  integer. 
Subroutine  to  perform  floating  point  subtraction. 

Subroutine  to  perform  floating  point  multiply. 

Subroutine  to  perform  floating  point  divide. 

Subroutine  to  convert  binary  integer  to  floating  point  number. 
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3o3.8„4  Detailed  Flow  Chart 


FAOO 
PAGE  1 
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FAOO 
PAGE  2 
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i 

CALL  $QS 
CONVERT  INTEGER  TO 
FLOATING 


CALL  $QM 

MULTIPLY  FLOATING 
INTEGER  BY  1000 


CALL  $QL 
SUBTRACT  FLOATING 
fr^GER  FROM  FARAy 


I 

STORE  RESULT 
IN  FARA,  FARB 


STORE  3 IN 
FA05+1  NO.  OF 
CHAR  TO  MOVE 


STORE  2 IN 
FA05+1  WHN 
TO  START 


3-98 


3-99 


3-100 


FA00 
PAGE  6 


ON 


/"Head  \ 

ZERO  SW 
s\FASW/' 

TOFF 


/ PKO 


STORE  CHAR  IN 
BUFFER 


SUBTRACT  I 
FROM  FADG 


FADG 


FACT 


RETURN 
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3.3.9  FILL  - Fill  Buffer 

3. 3.9.1  Purpose 

FILL  is  a subroutine  whose  purpose  is  to  store  the  contents  of  the 
A- register  into  a number  of  consecutive  core  locations. 

3. 3.9. 2 Technical  Description 

FILL  stores  the  contents  of  the  A- register  beginning  at  a location  w 
address  is  specified  in  the  B-register,  into  a number  of  consecutive 
locations  indicated  by  the  count  contained  in  the  X- register.  A 
practical'  use  of  this  subroutine  would  be  in  the  "blank"  filling  of  a 

buffer. 

3.3.9. 2.1  Calling  Sequence 
CALL  FILL 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

word  to  be  stored 

same 

B 

beginning  location  of 

address  +1  of  where 

destination  buffer 

the  last  word  was 

stored 

X 

number  of  locations  to 

zero  (0) 

fill 

Overflow 

N/A 

N/A 

3-102 


3. 3-9. 2.2  General  Flow  Chart 
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3. 3.9. 3  Label  Description 


3.3.9.3.1  Local 
N/A 

3. 3. 9. 3. 2 Global 
N/A 


3. 3. 9. 3. 3 Entry  Points 
FILL  - primary  entry  point 

3. 3. 9. 3. 4 External  References 


N/A 


3.3.9. A Detailed  Flow  Chart 
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3.3.10  FL00  - ASCII  to  Floating  Point 

3.3.10.1  Purpose 

The  purpose  of  the  subroutine  FL00  is  to  convert  a decimal  number 
stored  in  a pseudo  floating  point  format  into  its  Varian  Internal 
Floating  Point  representation. 

3.3.10.2  Technical  Description 

The  decimal  number  to  be  converted  is  stored  in  a pseudo- floating  point 
format  which  uses  the  following  four  parameters  to  define  a number:  sign, 

total  number  of  digits,  number  of  digits  to  left  of  the  decimal  point 
and  the  address  of  the  string  of  ASCII  numeric  characters. 

The  overall  technical  approach  used  in  the  conversion  involves  the 
repetitive  multiplication  and  partial  summing  by  the  positional  powers 
of  10.,  i.e.,  starting  with  the  most  significant  decimal  digit,  a partial 
sum  is  accumulated  by  taking  each  digit,  adding  it  to  the  partial  sum  and 
multiplying  by  10.  However,  since  the  word  size  on  the  6201  limits  us  to 
15  bits  of  accuracy,  and  since  the  number  of  digits  input  may  be  consider- 
ably larger,  overflow  may  possibly  result  from  both  the  multiplication 
and  addition  used  in  the  conversion  process.  This  overflow  problem  is 
handled  in  the  following  manner:  After  each  multiplication  or  addition 

in  the  conversion  process,  a test  for  overflow  is  made.  Should  overflow 
occur,  the  overflow  register  indicates  the  multiples  of  2 , that  is 

32,768,  that  should  be  added  into  the  partial  sum.  Therefore,  a separate 
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floating  point  partial  sum  containing  only  the  overflow  multiples  of 
32,768  is  maintained.  This  procedure  is  followed  until  all  of  the 
input  characters  have  been  processed.  The  remainder  of  the  number 
which  is  not  a multiple  of  32,768,  and  thus  not  counted  in  the  overflow 
partial  sum,  must  then  be  converted  to  floating  point  and  added  to  the 
overall  floating  point  sura. 

Should  the  input  number  to  be  converted  contain  a fractional  part,  that 
is, digits  to  the  right  of  the  decimal,  the  partial  sum  is  adjusted  by  a 
division  by  the  appropriate  power  of  10.  The  sign  of  the  input  number  is 
then  affixed. 
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3.3.10.2,1  Calling  Sequence 
CAI.1,  FL00,  A,B,C,D 
A Address  of  Sign  Word 

B Address  of  Pseudo  Exponent  in  Binary 

C Address  of  total  count  of  number  of  characters  to  be  converted 

D Address  of  number  to  be  converted 


A 

N/A 

High  order  of  result 

B 

N/A 

Low  order  of  result 

X 

N/A 

Modified 

Overflow 

N/A 

Modified 
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3.3.10.2.2  General  Flow  Chart 


BE 


o 


ilNARY  MULT> 
OVERFLOW 
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3.3.10.3  Label  Description 
3.3.10.3.1  Local 

FLCH  Binary  character  to  be  converted 

FLMA  Floating  point  32,768.0 

FLM3  Working  storage  for  floating  point  number 

FLSW  Overflow  switch 

FLS1  Binary  accumulator 

FLS2  Floating  Accumulator 

FLTC  Address  of  count 

FLTE  Address  of  pseudo  exponent 

FLTM  Address  of  first  character  of  number  to  be  converted 

FLTN  Floating  point  10.0 

FI  TS  Add  re  re  Q £ on  gn  v’ord 

FLXI  Total  count  on  the  number 

FLZ0  Floating  zero 

3. 3. 4. 3. 2 Global 
None 

3. 3. 4. 3. 3 Entry  Points 
FL00 
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3.3.10.3.4  External  References 


SIGN 

UPOO 

UP01 

$QE 

§QK 

$QM 

$QS 

$SE 


Subroutine  to  copy  Sign. 

Subroutine  to  unpack  first  character. 

Subroutine  to  unpack  character. 

Subroutine  to  perform  floating  exponentiation. 

Subroutine  to  perform  floating  point  add. 

Subroutine  to  perform  floating  point  multiply. 
Subroutine  to  convert  integer  number  to  floating  number. 
Subroutine  to  save  parameters. 
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3.3.10.4  Detailed  Flow  Chart 


PAGE  1 
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SET  OVERFLOW  SW  FLSW 
SET  REGX  TO  AMOUNT  OF 
OVERFLOW 


FLOO 
PAGE  3 
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3.3.H  HMOO  - Magnetic  Tape  Handler 

. . • ■ • - i 

3.3.11.1  Purpose 

HMOO  is  a general  purpose  tape  routine  capable  of  handling  all  available  tape 
functions.  The  purpose  of  this  routine  is  to  reduce  the  duplication  of  effort 
that  is  inherit  when  individual  users  develop  their  own  coding  to  handle  each 
specific  tape  I/O  operation.  The  routine  currently  does  not  return  control 
to  the  calling  program  until  I/O  is  complete  or  an  error  is  detected,  but 
as  soon  as  additional  interrupts  are  available  on  the  DOC  system,  the  routine 
will  be  modified  to  allow  overlapped  processing  during  tape  operations. 

3.3.11.2  Technical  Description 

HMOO  allows  input  or  output  of  variable  length  tape  records.  The  Model  620i-31 
Magnetic  Tape  System  Controller  is  capable  of  performing  8 functions  (see 
Calling  Sequence  3.3.8. 2.1)  all  of  which  are  handled  by  HMCO.  The  BIC  is  used 
for  input  and  output  operations.  HMOO  first  sets  up  the  BIC  instructions  by 

< 

using  the  MTU  number  received  in  the  call  and  saves  the  MTU  number  for  later 
use  in  building  the  actual  tape  instruction.  The  starting  buffer  address  is 
picked  up  from  the  call;  the  ending  address  is' computed  by  using  the  number 
of  words  to  be  transferred  in  the  call,  and  the  BIC  initial  and  BIC  final 
addresses  are  output  to  the  BIC.  The  tape  function  is  picked  up  from  the 
arguments  and  combined  with  the  MTU  number  to  create  the  tape  instruction. 

The  I/O  operation  is  then  executed.  After  completion  of  the  I/O,  HMOO  ^ 

checks  the  status  of  the  MTU  and  returns  that  status  to  the  calling  program 
as  the  fifth  parameter  of  the  call. 
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3*3*11.2.1  Calling  Sequence 
CALL  HMOO,A,B,C,D,STAT 


PARAMETER 

A 


B 

C 


D 

STAT 


' FUNCTION 

Address  of  location  containing  tape  function 
to  be  performed.  . • 

0 = input  binary 

1 = input  BCD 

2 ss  output  binary 

3 - output  BCD 

4 = Write  End  of  File 

5 = Forward  one  record 

• 6 = Backspace  one  record  . * 

7 = Rewind 

Beginning  location  of  buffer  (not  to  exceed  (37777g) 
Address  of  location  containing  number  of  words  to 
transfer 

Address  of  location  containing  unit  number  (10  or  11Q) 

o o 

Address  of  location  containing  Status  of  I/O  operation, 
(Output  by  HM00  to  calling  program.) 


STAT  = 2 0 I/O  completed  successfully.  Number  indicates 
number  of  words  transferred. 


STAT  = -1  User  requested  I/O  still  in  progress, 
(to  be  implemented) 


3-118 


3.3.11*2.1  Calling  Sequence  (Continued 
PARAMETER  FUNCTION  . 

STAT  = -2  End  of  File 

STAT  = -3  Tape  Error 

STAT  = -4  End  of  Tape 

STAT  = -5  Beginning  of  Tipe 
Busy  Return  CALL+7 

Handler  busy  processing  a previous  I/O  request. 
Normal  Return  Call  +9 

. Requested  I/O  complete.  User  must  check  STAT 
for  errors  or  number  of  words  transferred. 


REGISTER 

fcONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

Saved 

Same  as  Entry 

B 

Saved 

Same  as  Entry 

X 

Saved 

Same  as  Entry 

Overflow 

Not  effected 

Same  as  Entry 
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3.3.11.2.2  General  Flow  Chart 


i 
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3.3.11*3  Label  Description 


3.3.11.3.1  Local 
HM1  - HM5,  HM15 
HMOl 

HMA 

HMAB 

HMA3 

HMA4 

HMB 

HMBA 

HMBU 
KMB3 
HMB  4 
HMC3 

HMC4 

HMD3 

HMD4 

HME3 

HME4 

HMFF 


Locations  of  BIC  instructions  initialled  by  HMOO 
Location  where  tape  I/O  instruction  is  constructed 
and  executed. 

Save  area  for  A- register. 

Indirect  address  for  unit  number. 

Initialize  BIC  2 instruction.  Used  for  initialization. 
Initialize  BIC  4 instruction. 

Save  area  for  B-register. 

Beginning  address  of  buffer.  Used  to  compute  number  of 
words  transferred. 

Previous  I/O  in  progress  (to  be  implemented). 

Sense  BIC  2 not  busy  instruction.  Used  for  initialization. 
Sense  BIC  4 not  busy  instruction.  Used  for  initialization. 
Set  BIC  2 starting  address  instruction.  Used  for 
initialization.  ’ , 

Set  BIC  4 starting  address  instruction.  Used  for 
initialization. 

Set  BIC  2 final  address  instruction.  Used  for 
initialization. 

Set  BIC  4 starting  address  instruction.  Used  for  ^ 
initialization. 

Enable  BIC  2 instruction.  Used  for  initialization. 

Enable  BIC  4 instruction.  Used  for  initialization. 

Tape  function  being  performed. 
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3.3. 11.3.1  Local  (Continued) 


HMF3 

HMF4 

HMUN 

HMX 

HMXX 

3.3.11.3.2  Global 
HMOO 


Location  containing  a "load  BIC  2 initial  register” 
instruction.  Used  for  initialization. 

Location  containing  a "load  BIC  4 initial  register" 
instruction.  Used  for  initialization. 

Unit  number. 

Save  area  for  X- register. 

Indirect  argument  pointer. 

. Entry  point  into  subroutine. 


3.3.11.3.3  Entry  Points 
HMOO  primary  entry  point 

3.3.H.3.4  External  References 
None, 


v 
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3.3. 11.4  Detailed  Flow  Chart 
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3-125 


3-126 


3-127 


3-129 


3-130 


RESTORE 

REGISTERS  FROM  I 

HMA,  HMB 

, AND 

HMX 
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3.3.12  1AAR  Input  TTY  or  Modem 
3.3.12.1  Purpose  /' 

The  purpose  of  IAAR  is  to  input  a string  of  characters  into  a user  specified 
buffer  from  the  CLINC  TTY's,  DOC  TTY,  or  DOC  103  Modem. 


3.3.12.2  Technical  Description 

IAAR  gains  control  when  it  is  called  by  the  generalized  Input  Message  (IM00) 
Routine.  The  complete  input  string  is  stored  in  the  user  buffer  before  the 
user  status  word  is  updated  and  control  is  returned  to  IMOO.  As  soon  as  character 
interrupts  are  available  on  the  DOC  system,  IMOO  may  be  modified  to  return 
control  to  the  original  calling  program  when  input  of  the  first  character  is 
initiated.  IAAR  calls  the  Input  Character  Routine  (ISB1)  to  input,  edit,  and 
echo  each  input  character.  The  input  instructions  in  ISB1  are  set  up  for  the 
assigned  input  device  by  the  Initialize  System  (ISOO)  Routine. 

In  addition  to  inputting  and  packing  the  input  message,  IAAR  checks  for  several 
input  control  characters  and  terminates  the  input  accordingly.  If  an  input 
complete  code  (*)  is  received,  the  user  status  word  is  set  to  the  number  of 
characters  packed  in  the  input  buffer  and  control  is  returned  to  the  user 
via  IMOO. 

If  a cancel  line  ($)  character  is  detected,  a (-3)  status  is  returned.  If  a 
cancel  retrieval  request  (@)  character  is  received,  a (-4)  status  is  returned. 
Finally,  if  the  maximum  number  of  input  characters  allowed  by  the  user  program  is 
reached,  the  operation  status  word  is  set  to  that  number  and  control  returned  to 
the  calling  program.  (Note  that  the  *,  $,  @,  CR,  and  LF  are  not  stored  or 
counted  by  IAAR). 
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3o3. 12.2.1  Calling  Sequence 
CALL  IAAR,  A,B 


PARAMETER 

FUNCTION 

A 

Address  of  input 

buffer. 

B 

Maximum  number  of 
the  input  buffer. 

characters 

allowed  for 

REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS 

UPON  EXIT 

A 

N/A 

Modified 

B 

N/A 

Modified 

X 

N/A 

Modified 

/ 

Overflow 

N/A 

Modified 
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3.3.12.2.2  General  Flow  Chart 
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A 


STORE  PACKED 
CHARACTERS  INTO 
USER  BUFFER 


YES 


SET  USER'S 
STATUS  TO  INPUT 
CHAR.  COUNT. 


NO 


r 


NO 
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FIRST  OR  SECOND  CHARACTER 
OF  PACK  WORD  BEING 
PROCESSED. 
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3.3.12.3  Label  Description 

3.3.12.3.1  Local 

IAAC  * Location  containing  actual  input  character  count, 

IAA9  - Location  containing  incremented  buffer  address. 

IA12  Save  area  for  maximum  input  characters  allowed. 

3.3.12.3.2  Global 
None 

3.3.12.3.3  Entry  Points 
1AAR 

3.3.12.3.4  External  References 
1S31  - Subroutine  called  to  input,  edit,  and  echo  each  input  character 


3.3.12.^  Detailed  flow  unart 
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/'6anceln\ 

REQUEST  CHAR. 
V (@)  / 


FIRST  OR  SECOND*- 
CHAR.  OF  PACK 
•^^WORD^ 

SECOND 

CHAR. 


MAX.  \ 
“CHAR.  COUNT 
INPUT? 


FIRST  CHAR 
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3.3.13  1M00  - Input  Message  ' 

3.3.13.1  Purpose 

The  purpose  of  the  Input  Message  Routine  is  to  provide  MDTRS  with  a 
generalized  input  routine  which  will  service  all  input  message  requests 
regardless  of  the  specific  hardware  configuration  in  which  MDTRS  is  . - . 

operating. 

3.3.13.2  Technical  Description 

IMOO  is  designed  to  require  a common  calling  sequence  for  input  message 
requests.  IMOO  serves  as  an  interface  (or  link)  to  the  specific  I/O 
handler  which  has  been  assigned  by  the  Initialize  System  (ISOO)  Routine. 

The  common  arguments  passed  to  IMOO  by  the  calling  program  are  converted 
by  IMOO  to  the  proper  calling  sequence  required  by  the  specific  I/O 
handler. 

IMOO  utilizes  a table  (IMDT)  which  contains  the  addresses  of  'set  up' 
processing  to  be  done  for  each  particular  I/O  handler.  The  device  code 
(IMDC)  is  used  to  index  into  the  IMDT  table  to  obtain  the  address  of  the 
'set  up'  processing  for  each  I/O  handler.  After  the  appropriate  handler 
has  been  called,  IMOO  does  not  regain  control  until  either  the  input 
character  count  has  been  satisfied  or  a terminating  condition  has  been 

v 

detected  by  the  I/O  handler.  The  I/O  handler  may  return  control  to  the 
user  for  concurrent  processing  while  the  I/O  is  taking  place.  See  the 
individual  I/O  handler  documentation  for  specific  input  processing. 

When  IMOO  regains  control  it  returns  control  to  the  calling  program. 
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This  status  word  will  be  initialized  by  the  specific  handler  to  (-1) 
as  soon  as  the  first  input  command  is  issued.  As  soon  as  the  first 
character  is  received  by  the  computer,  the  status  word  is  changed  to 
(-2).  If  a cancel  line  character  ($)  is  received,  a (-3)  will  be  set 
in  the  status  word.  If  a cancel  request  character  (@)  is  received, 
a (-4)  will  be  returned.  Refer  to  the  calling  sequence  for  additional 
error  codes  to  be  implemented  at  a later  date. 

If  an  input  complete  code  (*)  is  received  by  the  I/O  handler  or  the 
maximum  number  of  characters  to  be  input  is  reached,  the  operation  status 
word  will  be  changed  to  a positive  value  indicating  the  number  of  data 
characters  which  have  been  placed  in  the  user  specified  buffer. 

The  special  characters:  Carriage  Return  (CR),  Line  Feed  CLF),  Asterisk  (*), 

Dollar  Sign  ($),  at  sign  (@),  EOM,  LINE  or  END  are  not  placed  in  the  user's 
buffer  but  are  echoed  back  to  the  output  device  by  the  assigned  I/O 
handler.  This  status  word  address,  in  addition  to  the  beginning  address 
of  the  input  buffer,  address  of  character  count,  and  address  of  cursor 
position  word  if  required,  is  defined  in  IMOO  but  used  by  the  individual 
I/O  handlers. 

3.3.13.2.1  Calling  Sequence  V 

CALL  IMOO,  A,B,C,D 
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PARAMETER 


FUNCTION 


A The  beginning  address  where  the  message  is  to  be 

stored,  (Packed  two  characters  per  word.) 

B The  address  of  a word  containing  the  maximum  number  of 

characters  to  be  accepted  as  input. 

C Always  zero  (0). 

D The  address  of  an  operation  status  word. 

The  status  returned  by  the  input  message  routine  IM00  will  be  as 
follows: 

Positive  value  = Input  complete.  The  value  of  the 
positive  number  will  be  the  number 
of  characters  received.  (May  be 
zero  if  no  data  characters  are 
transmitted  but  operation  is  complete.) 

-1  = Input  initiated  - first  character  not 
received  yet, 

-2  = Input  initiated  - first  character  received. 

-3  = Cancel  line  character  ($)  received. 

-4  = Cancel  request  character  (@)  received. 

-5  = Parity  error  (can  character)  (CRT  only) 
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-6  = 103  modem  disconnected, 
-7  =.  CRT  not  ready. 


The  return  addresses  will  be  as  follows: 

CALL+6  = previous  I/O  still  in  progress. 
CALL+8  = I/O  initiated.  User  must  check 

operation  status  word  at  this  point 


REGISTER 

A 

B 

X 


CONTENTS  UPON  ENTRY 
Saved 
Saved 
Saved 


CONTENTS  UPON  EXIT 
Restored 
Restored 
Restored 


Overflow 


Unknown 


Modified 


3.3.13, 

3.3.13, 

IMA 

IMB 

IMBU 

IMDT 

IMX 

1M05 

3.3.13 

IMBA 

IMCC 

IMCP 

IMDC 

IMOS 

3.3.13 
1M00 
IMSR  - 

IMRR  - 


3 Label  Description 

3.1  Local 

A- Regis ter  Save  Area 
B-Register  Save  Area 

Busy  indicator  for  IMOO  Routine  (IMBU  = -1  for  Busy) 

Table  containing  address  of  set  up  processing  for  each 
individual  Input  Handler  call. 

X-Register  Save  Area 

Address  of  call  to  TTY  or  Modem  Input  Handler.  Used  to 
initialize  calling  parameters. 

3.2  Global 

Beginning  Address  of  Input  Buffer  (Referenced  by  Input  Handler) 
Address  of  Input  Character  Count  (Referenced  by  Input  Handler) 
Address  of  Cursor  Position  Word  if  required  (Referenced  by 
Input  Handler) 

Device  code.  Set  by  ISOO. 

Address  of  Ooeration  Status  Word  (Referenced  by  Input  Handler) 

3.3  Entry  Points 

N 

Entry  point  for  Saving  Registers.  Called  by  Output  Message  Routine 
(0M00). 

Entry  point  for  Restoring  Registers.  Called  by  Output  Message 
Routine  (0M00). 
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3.3.13.3.4  External  References 


1AAR  - Input  handler  for  both  CLINC  TTY's,  DOC  TTY,  and  DOC  103  Modem 
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3.3.13.4  Detailed  Flow  Chart 


USING  DEVICE  CODE  IMDC  AS  AN 
INDEX,  PICK  UP  THE  ADDRESS 
WHERE  PROCESSING  IS  TO  CONTINUE 
FOR  SETTING  UP  THE  CALL  >OR  THE 
APPROPRIATE  I/O  HANDLER 


3-149 


3-150 


3.3.14  1S00  - Initialize  System 

3.3.14.1  Purpose 

The  primary  purpose  of  the  ISOO  subroutine  is  to  permit  the  same  MDTRS 
object  program  to  operate  for  various  configurations  on  various  computer 
systems.  This  capability  eliminates  .tbe  tedious,  costly,  and  sometimes 
confusing  task  of  maintaining  many  "configuration  tailored"  object  programs, 
operating  instructions,  and  program  documentation.  ISOO  accomplishes  this 
by  initializing  all  input/output  routines  with  the  operator  requested 
configuration  device  numbers  and  device  dependent  coding. 

3.3.14.2  Technical  Description 

The  ISOO  routine  requires  the  operator  to  type  in  a description  of  the 
configuration  that  MDTRS  must  satisfy.  Refer  to  the  Users  Guide  for 
specific  computer/operator  dialogue.  ISOO  types  the  code  numbers  and 
instructions  on  the  operator  console  before  requiring  the  operator  to 
answer  questions  about  the  configuration.  ISOO  contains  tables  of  device 
numbers,  PIM  numbers,  interrupt  masks,  and  interrupt  locations  associated 
with  each  computer  system  and  each  I/O  device.  In  addition,  tables  contain- 
ing I/O  instruction  addresses  in  each  of  the  I/O  handlers  are  maintained 
so  that  those  instructions  may  be  modified  if  necessary.  These  tables 
are  used  to  set  up  the  appropriate  I/O  handlers  with  proper  device  numbers,  ^ 
PIM  numbers,  etc.  ISOO  initializes  the  Input  Message  Routine  (IMOO) 
and  the  Output  Message  Routine  (0M00)  to  call  the  appropriate  handlers 
based  upon  the  requested  hardware  configuration. 
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All  Inputs  from  the  operator  are  checked  for  validity,,  The  operator  is 
required  to  assign  the  tape  unit  number  for  the  Master  Data  Tape  and 
HCOO  verifies  that  the  tape  is  on-line.  In  addition,  HCOO  initializes 
the  103  modem  and  waits  for  a telephone  connection  if  it  is  part  of  the 
requested  configuration. 

3.3.14.2.1  Calling  Sequence 

CALL  IS00  ‘ 

PARAMETER  FUNCTION  ' 

None 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

n 

H/A 

Modified 

B 

N/A 

Modified 

X 

N/A 

Modified 

Overflow 

N/A 

Modified 
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3.3.14.2.2  General  Flow  Chart 
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"MTU  NOT 
READY" 
MESSAGE 


ASSIGNED 
MTU  ON-LINE?! 


"SYSTEM 

INITIALIZED" 

MESSAGE 


/1 03  \ 
MODEM 
ASSIGNED? 


INITIALIZE 
103  MODEM 
CONTROLLER 


■TELEPHONE  x 
CONNECTION? 


LOAD  MODEM 
CONTROL  REGISTEF 
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© 


INPUT  CHARACTER 


DO  NOT  ECHO 


RETURN 


3.3.14.3  Label  Description 


3.3.14.3. 


1SCC 

1SDT 


1SD3 

ISHT 

1SNW 

1SN1 

ISN2 

ISN3 

1SN4 

ISN5 

ISQ1 

1SQ2 

ISQ3 

ISQ4 

1SQ5 

1STM 

IST1 

IST2 

1SZZ 


1 Local 

Temporary  location  for  computer  code,  (for  future  use  only) 
Table  containing  actual  computer  device  codes  associated  with 
device  code  numbers  used  by  ISOO  to  communicate  with  the 
operator. 

Table  of  addresses  which  must  have  device  number  placed  in 
them  for  TTY  and  103  Modem  I/O. 

Table  of  addresses  where  table  of  addresses  for  modifying  each 
handler  can  be  found. 

Number  of  words  in  ISTM  buffer  used  for  TTY  call. 

Number  of  words  in  ISQ1  buffer  - used  for  TTY  call. 

Number  of  words  in  ISQ2  message  buffer. 

Number  of  words  in  ISQ3. 

Number  of  words  in  ISQ4. 

Number  of  words  in  ISQ5.  > 

"WHAT  COMPUTER"  message  buffer. 

"PRIMARY  RETRIEVAL  DEVICE"  message  buffer. 

"MOUNT  MASTER  TAPE"  message  buffer. 

"SYSTEM  INITIALIZED"  message  buffer. 

"MTU  NOT  READY"  message  buffer. 

"INITIALIZE  SYSTEM"  message  buffer. 

"ILLEGAL  CODE"  message  buffer. 

Number  of  words  in  IST1 

End  Flag  for  Device  instruction  address  table  (ISD3). 
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IS3B 


Location  where  "SENSE  MTU  READY"  instruction  is  initialized. 

1 SI 4+1  Indirect  address  of  instruction  to  receive  device  number. 

1S20+1  Indirect  address  of  instruction  to  receive  device  number. 

IS31  Location  where  "SENSE  MTU  READY"  instruction  is  initialized. 

IS35  TTY  or  103  modem  instruction  requiring  device  number  to  be  initialized. 

IS37  TTY  or  103  modem  instruction  requiring  device  number  to  be  initialized. 

IS40  TTY  or  103  modem  instruction  requiring  device  number  to  be  initialized. 

IS44  TTY  or  103  modem  instruction  requiring  device  number  to  be  initialized. 

IS48  TTY  or  103  modem  instruction  requiring  device  number  to  be  initialized. 

IS52  TTY  or  103  modem  instruction  requiring  device  number  to  be  initialized. 

IS54  TTY  or  103  modem  instruction  requiring  device  number  to  be  initialized. 

IS92  Output  buffer  address  used  by  output  operator  message  (IS90). 

3.3.14.3.2  Global 

CPUN  Equated  to  ISTU. 

ISN6  Number  of  words  in  ISQ6.  Referenced  by  PF00. 

ISQ6  "PUT  MAG  TAPE  ON  LINE"  message  buffer.  Referenced  by  Power  Fail  Routine 
(PF00) . 

ISTU  Tape  unit  number.  To  be  used  by  any  call  to  the  mag  tape  handler  CHM00). 

3.3.14.3.3  Entry  Points 
1S00 
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3.3.14.3.4  External  References 

CPC1  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
CPC2  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
ISB2  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
ISB3  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
0ZK2  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
0ZK3  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
0ZK4  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
0ZK5  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
0ZN2  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
0ZW1  TTY  or  103  Modem  instruction  requiring  device  number  to  be  initialized. 
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3.3.14.4  Detailed  Flow  Chart 


INITIALIZE 
OPERATOR  TTY 
CALLS  WITH  WORD 
COUNTS 


IS01 


TYPE  OUT 
INITIALIZATION 
INSTRUCTIONS 
TO  OPR-^" 


"WHAT 

COMPUTER  IS 
THIS7" 


$h 
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ISIA  \ INPUT  FIRST  CHARACTER  OF  MTU  NUMBER 
\ FROM  OPERATOR 
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3-166 


3.3.15  ISB1  - Input  a character  from  KSR-35 

/ ■ , . ■: 

3.3.15.1  Purpose 

This  routine  inputs  a character  from  the  KSR-35  teletype,  checks  it  for 
validity,  and  outputs  it  to  the  TTY.  When  the  character  is  illegal  it  is 
deleted. 

3.3.15.2  Technical  Description 
N/A 

3.3.15.2.1  Calling  Sequence 
CALL  ISB1 

PARAMETER 

None 

CONTENTS  UPON  EXIT 
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REGISTER  CONTENTS  UPON  ENTRY 

A destroyed 

B destroyed 

X undisturbed 

Overflow  undisturbed 


c 


3.3.15.3  Label  Description 


3.3.15.3.1  Local 

ISB5  - ASCII  character  mask 


3.3.15.3.2  Global 
None 


3.3.15.3.3  Entry  Points 
1SB1  - primary  entry  point 

3.3.15.3.4  External  References 
OZKB  - output  one  character  to  TTY 


3.3.15.4 


Detailed  Flow  Chart 


/ 
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3.3.16  LIOO  - List 


3.3.16.1  Purpose 

The  purpose  of  this  subroutine  is  to  format,  in  outline  form,  the  data 
specified  by  the  WHAT  response  in  the  Retrieval  Request. 

3.3.16.2  Technical  Description 

A match  to  a WHAT  parameter  indicates  that  the  parameter  is  to  be  output. 

Both  the  Heading  and  its  associated  Answer  are  output,  even  if  both  were 
not  specified  in  the  Retrieval  Response. 

Example: 

WHAT:  ASTHMA 

If  the  Heading  ASTHMA  is  found  on  the  record,  then  ASTHMA  will  be  output  as 
well  as  the  Answer  associated  with  it,  which,  in  all  probability,  is  either 
NEG  or  POS. 

Associated  with  each  Heading -Answer  pair  is  a "level  code".  This  code  is  a 
number  from  0-9,  and  it  specifies  two  characteristics  of  the  Heading-Answer 
pair:  the  level  of  the  pair  in  the  hierarchical  structure  of  the  record 

format,  and  the  relation  among  pairs.  Each  of  these  characteristics  will 
have  an  effect  on  the  output.  The  level  of  the  pair  will  be  shown  on  output 
by  indenting  each  Heading  a number  of  spaces  equal  to  the  value  of  the  level 
code.  The  relation  among  Heading-Answer  pairs  will  be  indicated  by  outputting 
in  addition  to  the  matched  parameter,  all  those  pairs  related  to  the  one 
matched.  Example:  if  ASTHMA  is  related  to  the  Headings  PAST  HX  and  GENERAL, 
then  these  Headings  and  their  associated  Answers  should  also  be  output. 


Relation  among  Headings  is  determined  in  the  following  manner:  starting 

at  the  level  code  of  the  matched  Heading  and  proceding  back  through  the 
codes,  find  a level  code  that  is  one  less  in  value  than  the  matched 
Headings  level  code.  The  Heading  associated  with  this  level  code  is 
related  to  the  matched  Heading,  From  this  point,  proceed  backwards  again 
until  a code  that  is  two  less  is  found.  This  continues  until  a level  code 
of  zero  has  been  reached.  Now  examine  each  level  code  forward  from  the 
matched  Heading's  code.  If  the  level  code  is  greater  than  the  matched 
code,  its  Heading  is  related.  When  the  first  code  less  than  or  equal 
to  the  level  code  of  the  matched  Heading  is  found,  the  search  is  finished. 

As  each  Heading-Answer  pair  is  matched  by  MWOO  it  and  all  related  pairs 
are  flagged  for  eventual  output.  This  flagging  consists  of  setting  the 
v.’ord  preceding  the  level  code  of  sfi.ch  pelr  to  -1*  When  th?  entire  record 
has  been  considered,  the  flagged  data  is  output.  In  the  case  of  the 
default  condition  for  WHAT,  all  data  on  the  record  is  output. 


If  the  user  input  "ID  ONLY"  as  his  response  to  the  WHAT  question,  only 
the  line  of  data  containing  the  ID  information  is  output. 

3.3.16.2.1  Calling  Sequence 
CALL  LIOO 

\ 


REGISTER 

A 

B 

X 


CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

Overflow 


N/A 


N/A 
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3.3.16.2.2  General  Flow  Chart 
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3.3.16.3 

3.3.16.3 

L1AN 

LIBC 

LIBL 

L1CC 

LICL 

LICR 

L1EA 

L1EQ 

L1FW 


Label  Description 
.1  Local 

beginning  address  in  the  tape  buffer  of  the  IANS  section  (or  the 
section  of  the  record  containing  the  Answers). 

blank  counter.  Counts  the  number  of  consecutive  blanks  before 
they  are  stored  for  output. 

(40  ) blank 
o 

character  counter.  Used  to  count  characters  in  special  situations 
(Headings,  Answers) 

(72g)  colon 

(150)  carriage  return 

O ‘ . 

ending  address  of  the  current  Answer. 

(75g)  equal  sign 

beginning  address  in  the  tape  buffer  of  the  1FWAA  section  (or 
the  section  of  the  record  containing  the  beginning  addresses  of  the 
Answers ) . 
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3.3.16.3 

LIID 

LT1Q 

LILA 

LILC 

LILL 

LILQ 

LILX 

LIQN 

LIQX 

LISA 

LIST 


1 Local  (Continued) 

ID  only  flag.  If  set,  indicates  that  the  user  response  to  WHAT 
was  "ID  ONLY." 

beginning  address  in  the  tape  buffer  of  the  IQ  section  (or  the  section 
of  the  record  containing  the  Headings). 

address  of  the  current  level  code 

the  value  of  the  current  level  code 

line  character-counter.  Counts  the  number  of  characters  on  the 
current  line. 

beginning  address  in  the  tape  buffer  of  the  LCQ  section  (or  the 
section  of  the  record  containing  the  level  codes). 

a dummy  level  code 

question  number.  The  number  of  the  Heading-Answer  pair  currently 
being  dealt  with. 

temporary  question  number.  Dummy  location  for  the  question  number  v 
starting  address  of  the  current  Answer 
status  word  returned  set  by  OMOO  on  output 
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3.3.16.3. 

LISV 

LITB 

3.3.16.3. 

None 

3.3.16.3. 
LIOO 

3.3.16.3. ' 
CDOO 

CPRT 

CPTB 

MWOO 

OMOO 

PKBX 

PKIX 

PKSW 


1 Local  (Continued) 
utility  save  location 

. ' • ' * . • , -'TC- 

(74g)  tab  character 

2 Global 

3 Entry  Points 

4 External  References 

routine  to  decode  the  date  on  the  record. 

Request  Table 
Tape  input  buffer 

routine  to  match  responses  to  WHAT  request,  to  record  Headings. 

routine  to  control  output  to  primary  output  device. 

beginning  address  of  buffer  into  which  characters  are  to  be  packed. 


index  into  buffer  into  which  characters  are  being  packed, 
switch  indicating  which  half  of  word  to  pack  next  character. 
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3.3.16.3 

PK01 

SEOO 

TABF 

UPOO 


4 External  References  (Continued)  . 

routine  that  packs  characters  two  per  word. 

routine  to  output  error  message  to  system  I/O  device,  the  teletype, 
buffer  used  to  pack  a line  of  data  for  output, 
routine  to  unpack  characters  from  buffer. 
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3.3.16.4  Detailed  Flow  Chart 


CPRT+6  = 0 


3»  179 
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LI  20 


0 


FLAG  RELATED  LEVEL 
CODES  (ASSOCIATED 
WITH  HEADING- 
ANSWER  PAIRS) 
PRECEDING  MATCHED 
LEVEL  CODE  (HEADING- 
ANSWER  PAIR). 


*i» 
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3-182 


3-183 


END  OF 
HEADINGS? 


FLAG  ALL  LEVEL  CODES 
(ASSOCIATED  WITH  HEADING- 
ANSWER  PAIRS) 
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3-185 


LIAS 


WERE  THERE 
ANY  MATCHES? 


LIA6 


LI  48 


CLEAR  LINE 
CHARACTER- 
COUNTER  (LILL) 
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150  ) LI50 


UP00 


INITIALIZE 
UPOO  TO  SS  NO 


LI$2 


PICK  UP 
HEADER 
INFORMATION 


UPOO 


INITIALIZE 
UPOO  TO 
RECORD 


LI$2 


PICK  UP 
HEADER 
INFORMATION 


UPOO 


INITIALIZE 
UPOO  TO  TYPE 


r-L, 
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CPTB+1 25 


3-188 


CPTB+1 19 


170 


INCREMENT  LINE 
CHAR-CTR  (LILL) 


CDOO 


CONVERT 

DATE 


. 

PICK-UP 

YEAR 

UNPACK  YEAR 

. 

PK02 


PACK  1ST 
DIGIT 


' 

INCREMENT 
LINE  CHAR-CTR 
(LILL) 

PK01 


PACK  2ND 
DIGIT 


V. 
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3-190 


HEADING 


LI55 
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HEADING 


SAVE  CHAR 
(LISV) 


PICK-UP  SAVED 
CHARACIER 
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I 


3-195 


290)  LX95 


/'QUESTION''-' 
NO.  = LAST 
V QUES.  NO. 


INCREMENT 
TEMPORARY  QUES. 
NO. 


ENDING  ADDRESS 
OF  ANSWER  = END 
OF  ANSWER 
PORTION  OF 
RECORD 


INCREMENT  INDEX 
TO  STARTING 
ADDRESS  OF 
ANSWER  BY  3 


/^ENDINGV 

ADDRESS=0 


SAVE  ENDING 
ADDRESS 


SET  CHAR- CTR 
= 1 


CLEAR  BLANK 
CTR  (LIBC.) 


f UPOO  N 
UNPACK  1ST 
v CHAR  OF  ANS, 
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330}  LIBO 


& 


LIB1 


3-199 


3-200 


3-201 


CLEAR 

SWITCH 

(PKSW) 


SET  INDEX  TO 
1 (PK1X) 


INITIALIZE  PACK  ROUTINE  BUT 
DO  NOT  CHARACTER 


3-203 


3-205 


STORE  BLANKS  AS  INDICATED  BY 
BLANK  CTR 


3-207 


3-209 


WRAP  UP  LIST  OPTION 


CLEAR  ID  ONLY 


3=  210 


3.3.17  MAOO  - Match 


/ ' ' . ' . 

3.3.17.1  Purpose 

The  purpose  of  the  MATCH  Subroutine  (MAOO)  is  to  find  a match  in  the 
Request  Buffer  and  in  the  Tape  Buffer. 

3.3.17.2  Technical  Description 

MAOO  compares  the  Tape  Buffer  to  the  Request  Buffer.  There  are  four  types 
of  matches  that  can  be  requested  by  the  user:  Heading  Only,  Headings  and 

Prose  Data,  Headings  and  Numeric  Values,  and  Headings  and  Range  of  Numeric 
Data. 

MAOO  checks  for  a match  by  heading  in  the  Request  Buffer  and  the  Tape  Buffer. 

If  a request  header  matches,  it  makes  a further  test  to  ascertain  whether  the 
request  is  heading  only,  heading- prose,  heading  numeric  value,  or  heading  range 
of  numeric  value.  If  heading  only  has  been  requested,  the  ‘match1  exit  is 
taken. 

On  heading- prose  data  the  subroutine  checks  the  answer  of  the  Tape  Buffer 
against  the  string  of  alphanumeric  characters  in  the  Request  Buffer. 

For  heading- numeric  value  request,  the  numeric  value  in  the  Tape  Buffer  is 
converted  to  a pseudo  floating  point  number.  The  value  in  the  Request  Buffer 
is  also  converted  to  the  same  pseudo  floating  point  format.  Then  the  pseudo 
floating  point  numbers  are  compared  on  the  sign,  the  number  of  characters  in 
pseudo  floating  point  number,  the  number  of  characters  to  the  left  of  the 
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decimal  point,  and  the  numeric  values. 

On  a heading  range  request,  MAOO  converts  the  Tape  Buffer  value  to  the 
pseudo  floating  point  format.  The  high  and  the  low  in  the  Request  Buffer 
are  converted  to  the  pseudo  floating  point  format  and  a range  test  made. 

MABO  is  the  second  entry  point  into  MAOO  subroutine.  The  purpose  for  the 
second  entry  point  is  to  convert  numeric  value  in  the  Tape  Buffer  to  pseudo 
floating  point  number  format.  MABO  is  called  after  MAOO  is  called  to 
specify  match  of  heading  only. 
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3.3*17.2.1  Calling  Sequence 
CALL  MAOO,  HEAD,  OP,  FLAG,  SW 


PARAMETER 

HEAD 

OP 

FLAG 


SW 


FUNCTION 

The  heading  number  to  be  checked  in  the  Tape  Buffers 
Pointer  to  Operand  Buffer. 

FLAG  0,  Check  only  Heading: 

1.  Check  Heading  and  Prose. 

2.  Check  Heading  and  Numerical  Data. 

3.  Check  Heading  and  Range  of  Numerical  Data. 
The  words  following  the  flag  are  pointers  to 
'Condition*  or  'What'  buffer  when  FLAG  equals 
1,  2 or  3. 

Switch  to  indicate  whether  Tape  Buffer  has  been 
moved.  MAOO  set  to  - 1 when  moving  the  Tape  Buffer, 
the  user  must  set  to  zero  when  the  new  Heading 
number  is  checked. 


CALL  MABO 
PARAMETER 

A call  to  MAOO  must  have  been  made  to  set  up  parameters  for  MABO 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A. 

Modified 

B 

N/A 

Modified 

X 

N/A 

Modified 

Overflow 

N/A 

N/A 
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3.3.17.2.2  General  Flow  Chart 


MAOO 


3-214 


COUNT  THE  NO.  OF 
CHARACTERS  IN 
REQUEST  BUFFER 


MAOO 


3-216 


3-21 


MAOO 


3-218 


MAOO 


MATCH 


3-219 


MAOO 
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3.3.17.3  Label  Description 


3.3.17. 

MABA 

MABI 

MACT 

MADS 

MAEC 

MAFP 

MAFW 

MAF6 

MAHB 

MAHD 

MAHN 

MA11 

MAI  2 

MAI  3 

MAI  4 

MALM 

MANS 

MAOP 

MAPP 


3.1  Local 

Address  of  the  Number  to  Convert  Pseudo  Floating  Point 
(Heading  Number  -l),!rl2  Used  to  calculate  Base  Address  of  Heading 
in  Tape  Buffer 
Working  Counter 

Decimal  Point  Switch  for  Pseudo  Floating  Point 
Terminate  Character  to  Check  for  in  Subroutine  MA55 
Address  of  Flag 

Pointer  to  Heading  Answer  in  Tape  Buffer 
Two  Characters  of  Pack  ASCII  Zero 
Area  where  Tape  Header  is  Stored 
Address  of  Heading  Number 
Heading  Number 

Number  of  Character  of  Heading  in  the  Tape  Buffer 
Number  of  Characters  of  Heading  in  Request  Buffer 
Working  Storage  used  to  Store  Total  Count  Address  for 
Pseudo  Floating  Point 

Working  Storage  used  to  Store  Exponent  Address  for  Pseudo 
Floating  Point 

Ending  Address  of  Answer  in  Tape  Buffer 
Beginning  Address  of  Answer  in  Tape  Buffer 
Address  of  Pointer  to  Operand  Buffer 

Set  to  1 when  there  is  an  Odd  Number  of  Characters  in  Heading 
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3.3.17.3.1  Local  (Continued) 


MAPS 

MAQ1 

MASI 
MASW 
MAW1 
MAW  2 
MAXX 
MASW 
MAZS 

3.3.17. 

MAHE 

MAHL 

MAHM 

MAHS 

MALC 

MALE 

MALF 

HALS 

MASI 

MATE 

MATL 

MATH 

MATS 


Working  Storage 

(Heading  Number  01)*3  Used  to  Calculate  Base  Address  of 

Heading  Answer  in  Tape  Buffer 

Address  of  Sign  of  Pseudo  Floating  Point 

Address  of  Packet  Switch 

Working  Storage  for  Temporary  Calculation 

Working  Storage  for  Temporary  Calculation 

Index  when  Odd  Character  is  in  Request  Buffer  and  MAHB 

Switch  Indicate  which  part  to  Unpack 

Leading  Zero  Switch  for  Pseudo  Floating  Point 

.2  Globe 

High  Exponent  for  Floating  Point  Number 
High  Count  for  Pseudo  Floating  Point  Number 
High  Pseudo  Floating  Point  Number 
High  Sign  for  Pseudo  Floating  Point  Number 
Low  Count  for  Pseudo  Floating  Point  Number 
Low  Exponent  for  Pseudo  Floating  Point  Number 
Low  Pseudo  Floating  Point  Number 
Low  Sign  for  Pseudo  Floating  Point  Number 

Switch  set  to  Non  Zero  on  No  Match  Condition.  Referenced  by  TAOO 

Tape  Exponent,  Number  of  Digits  to  Left  of  Decimal  Point 

Tape  Count  of  Number  of  Digits  of  Pseudo  Floating  Point  Number 

Tape  Pseudo  Floating  Point  Number 

Tape  Sign  Word  0,  Positive;  -1  Negative 
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3o3.17o303  Entry  Point 
MABO  / 

MAOO 


3.3.17.3.4  External  References 


CMOO 

CPTB 

FILL 

PKOO 

PKOl 

UPOO 

UPOl 

$SE 


Compare  Subroutine 

Table  Buffer,  See  Appendix  for  Details 
Subroutine  to  Fill  Buffer 

Entry  Point  of  Subroutine  to  Pack  First  Character  of  Buffer 

Entry  Point  of  Subroutine  to  Pack  Characters  in  Buffer 

Entry  Point  of  Subroutine  to  Unpack  First  Character  of  Buffer 

Entry  Point  of  Subroutine  to  Unpack  Characters  in  a Buffer 

Subroutine  to  Store  Parameter  List 


3.3.17.4  Detailed  Flow  Chart 


MAOO 
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3-226 


3-227 


3-230 


3“  231 


3-  232 


MABO 


ZERO 


LEADING  ZERO  SW  MAZS 
DEC  POINT  SW  MADS 
TAPE  EXPONENT  MATE 
TAPE  COUNT  MATC 
CHARACTER  SW  MUSW 

MAW1 
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/ 


3-  235 


3-237 
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3"  238 


LOAD  ADDRESS  OF 
LOWER  SIGN  IN 
MASI 


PICK  UP  ADDRESS 
OF  REQUEST 
BUFFER 


/ UPOO 
/GET  1ST 
( CHARACTER 
\ FROM  RQST 


MA50 

CHECK  FOR 
SIGN 
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3-2' 


f FILL 
ZERO  HIGH 
MANTISSA 


4 
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MA 

48 


3-246 


3-  247 


3-  248 


/^1ST  \ 
'CHARACTER 

\sw  ^ 


/ma\ 


/ PK01 \ 
PACK  NEXT 
CHARACTER  IN. 
V MANTISSA  / 


PICK  BUFFER 
ADDRESS 


■ 

|~  turn  1ST 


/ PKOO 
PACK  1ST 
CHARACTER  IN 
MANTISSA 


3-249 


QUESTION 
MAX  ^ 


NO 
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3-252 


MAO  5 
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CHARACTER 
\ blank/ 


NO 

/return 
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3.3.18  MCOO  - Match  Condition  . > 

/ . ' ' - . - 
. • / . 

3.3.18.1  Purpose 

MCOO  is  a subroutine  whose  purpose  is  to  determine  if  a match  exists 
between  a user  specified  alphanumeric  character  string  which  constitutes 
the  condition  parameter  and  an  entry  on  the  tape  record. 

3.3.18.2  Technical  Description 

The  routine  initially  checks  for  the  default  selection  (5th  word  of 
Request  Table  equal  to  zero),-  If  the  default  option  has  been  selected, 
a 'MATCH'  return  is  initiated;  otherwise,  the  Bool  buffer  (CPBB)  is 
cleared  and  each  heading: answer  pair  on  the  current  master  record  is  then 
compared  to  each  condition  response  parameter  in  the  user's  response  to 
the  question  "CONDITION".  If  no  match  Is  found  between  a master  record 
heading: answer  pair  and  a condition  response  parameter,  a 'NO  MATCH' 
return  is  initiated.  If,  however,  a match  does  occur,  control  is  passed 
to  TCOO  to  determine  if  the  entire  condition  response  parameter  string  is 
matched.  On  finding  the  Boolean  expression  true  (See  Section  3.3.39) 
control  is  returned  to  'match'  return  address  of  the  calling  program. 

If  TCOO  returns  a 'no-match'  then  the  next  condition  response  parameter 
is  processed.  This  procedure  is  repeated  until  either  TCOO  returns  a 
'match'  status  or  all  conditions  response  parameters  have  been  processed. 
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3.3.18.2.1  Calling  Sequence 


CALL  MCOO,A,B 

PARAMETER 

A 


B 


REGISTER 

A 

B 

X 


" FUNCTION 

Memory  location  whose  contents  specify 
where  to  return  in  the  calling  program 
in  case  of  a match. 

Memory  location  whose  contents  specify 
where  to  return  in  the  calling  program  in 
case  of  a non-match. 

CONTENTS  UPON  ENTRY  ; CONTENTS  UPON  EXIT 

N/A  Unpredictable 

N/A  Unpredictable 

N/A  Unpredictable 


Overflow 


N/A 


N/A 


3.3.18.2.2  General  Flow  Chart 
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3.3.18.3  Label  Description 


3.3.18 
MCCT  - 

MCMT  - 

MCNM  - 

MCQN  - 

MCSA  - 

3.3.18 
MCSW  - 

3.3.18 
MCOO  - 


/ . ' . ' 

3.1  Local  • 

storage  location  v;hich  contains  the  starting  address  of  the 
condition  table. 

storage  location  which  contains  the  address  to  which  this  routine 
returns  in  case  of  a match. 

storage  location  which  contains  the  address  to  which  this  routine 
returns  in  case  of  a non-match. 

storage  location  which  contains  the  current  tape  question  number 
being  processed. 

storage  location  which  contains  the  pointer  to  the  operand  buffer. 

3.2  Global 

storage  location  which  is  set  to  zero  each  time  this  routine  is 
referenced. 

3.3  Entry  Point 
primary  entry  point. 
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3.3.18.3.4  External  Reference 

3.3.18.3.4.1  External  Labels 

CPBB  - starting  address  of  the  Bool  buffer. 

CPCT  - starting  address  of  the  condition  table. 

CPRT  - starting  address  of  the  request  table. 

CPTB-P2  - storage  location  which  contains  the  number  of  questions  on 
the  record  being  processed. 

CFXD  - storage  location  which  is  used  as  an  index  into  the  operand 
buffer. 

> - 

3.3.18.3.4.2  External  Subroutines  • 

MAOO  - match  routine 

TCOO  - trace  condition  routine 
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3,3.18.4  Detailed  Flow  Chart 


CLEAR  BOOL 
BUFFER 
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3. 3.19  MDOO  - Match  Date 

3.3.19.1  Purpose 

MDOO  is  a subroutine  whose  purpose  is  to  compare  the  date  on  the 
current  tape  record  to  the  date  or  range  of  dates  in  the  user  response 
to  the  "DATE"  question. 

3.3.19.2  Technical  Description 

The  fourth  word  of  the  Request  Table  contains  a pointer  to  the  beginning 
of  the  date  response  in  the  Request  Buffer.  If  the  pointer  is  zero, 
implying  the  default  condition,  control  is  passed  to  the  calling  program 
with  a match.  Otherwise,  the  date  on  the  current  tape  record  is  compared 
to  the  user  requested  date.  The  user  may  request  a date  range 
(10MAR70- 20JUN70) , in  which  case  a master  record  date  need  only  fall 
within  the  two  values  to  constitute  a match. 

3.3.19.2.1  Calling  Sequence 


CALL  MDOO 

REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

Unpredictable 

B 

N/A 

Unpredictable 

X 

N/A 

Unpredictable 

Overflow 

N/A 

N/A 
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3.3.19.3  Label  Description 

3.3.19.3.1  Local 

MDCT  - storage  location  used  as  a counter  which  causes  the  routine 

not  to  have  to  make  an  extra  year-month  match  check  if  a match 
has  already  been  found  previously. 

3.3.19.3.2  Global 

N/A  * 

3.3.19.3.3  Entry  Points 
MDOO  - primary  entry  point 

3.3.19.3.4  External  References  

CPRT+3  - date  portion  of  the  Request  Table 

CPTB-t-119  - that  word  in  the  Tape  Input  Buffer  which  contains  the 

year  part  of  the  tape  record  date 

CPT&HL22  - that  word  in  the  Tape  Input  Buffer  which  contains  the 
month  part  of  the  tape  record  date 

CPTB+125  - that  word  in  the  Tape  Input  Buffer  which  contains  the  day 
part  of  the  tape  record  date 

- flag  which  is  set  if  a date  range  has  been  specified 
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RDDF 


3<,3ol9«4  Detailed  Flow  Chart 


pTf'V  no  vm*  A o 

FROM  RECORD  COMPARE  LOWER  DATE  LIMIT 

(CPTB+1 19) 
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MD30 


3-269 


MD75 


© 
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3.3.20  MWOO  - Match  What 


3.3.20.1  Purpose 

MWOO  is  a subroutine  whose  purpose  is  to  determine  if  a match  exists 
between  a user  specified  WHAT  response  and  an  entry  on  the  current 
tape  record. 

3.3.20.2  Technical  Description 

The  routine  initially  checks  for  the  default  selection  (7th  word  of 
Request  Table  equal  to  zero).  If  this  selection  has  been  made,  a 
'match'  return  is  initiated;  otherwise,  the  WHAT  Table  parameters 
are  successively  compared  to  a current  tape  record  heading- andwer  pair 
until  either  a match  is  found  or  all  WHAT  parameters  in  the  user  response 
to  the  question  "WHAT"  have  been  exhausted. 
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3.  3.  'JO. 1 Culling  Sequence 

/ ‘ - 

CALL  MWOO ,A,B ,C 

PARAMETER  FUNCTION 

A Memory  location  whose  contents  specify  which 

master  file  question  is  being  referenced. 

B Memory  location  whose  contents  specify  where 

to  return  in  the  calling  program  in  case  of 
a match. 

C Memory  location  whose  contents  specify  where 

to  return  in  the  calling  program  in  case  of 
a non-match. 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

Unpredictable 

B 

N/A 

Unpredictable 

X 

N/A 

Unpredictable 

Overflow 

N/A 

N/A 
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3.3.20.2.2  General  Flow  Chart 
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3.3.20,3  Label  Description 

3.3. 20.3.1  Local 

MWMT  - storage  location  which  contains  the  return  address  in  case  of 
a match. 

MWNM  - storage  location  which  contains  the  return  address  in  case  of 
a non-match. 

MWQN  - storage  location  which  contains  the  current  tape  question 
number  being  processed. 

KWSA  - storage  location  which  contains  the  pointer  to  the  operand 
buffer. 

MWXP  - storage  location  which  contains  the  beginning  address  of  the 
WHAT  TABLE. 

3.3.20.3.2  Global 

MWFG  - storage  location  which  contains  the  number  of  the  current 
tape  question  being  processed. 


MWSW  - storage  location  which  is  set  to  zero  each  time  this  routine 
is  referenced. 
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3-3.20.3.3  Entry  Point 
ML'00  - primary  entry  point 

3.3.20.3.4  External  References  ' 

3.3.20.3.4.1  External  Labels 

CPRT+6  - storage  location  which  contains  either  a zero  (default  condition) 
jor  a value  pointing  to  the  operand  buffer. 

GFWT  - beginning  address  of  the  W1AT  table. 

3.3.20.3.4.2  External  Subroutines 
MA00  - match  routine 
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3.3.20.4  Detailed  Flow  Chart 


EXIT 
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3.3.21  OMOO  - Output  Message 

3.3.21.1  Purpose 

The  purpose  of  the  Output  Message  Routine  is  to  provide  MDTRS  wiht  a 
generalized  output  routine  which  will  service  all  output  message  requests 
regardless  of  the  specific  hardware  configuration  in  which  MDTRS  is  operating, 

3.3.21.2  Technical  Description 

OMOO  is  designed  to  require  a common  calling  sequence  for  output  massage 
requests.  OMOO  serves  as  an  interface  (or  link)  to  the  specific  I/O  handler 
which  has  been  assigned  by  the  Initialize  System  (ISOO)  routine.  The  common 
arguments  passed  to  OMOO  by  the  calling  program  are  converted  by  OMOO  to  the 
proper  calling  sequence  required  by  the  specific  I/O  handlers. 

OMOO  utilizes  a table  (OMDT)  which  contains  the  addresses  of  'set-up' 
processing  to  be  done  for  each  particular  I/O  handler.  The  device  code 
(OMDC)  is  used  to  index  into  the  OMDT  table  to  obtain  the  'set-up'  processing 
address.  After  the  appropriate  handler  has  been  called,  OMOO  does  not  regain 
control  until  the  output  character  count  has  been  satisfied;  however,  the 
assigned  I/O  handler  may  return  control  directly  to  the  calling  program  for 
concurrent  processing  while  I/O  is  taking  place.  See  the  individual  I/O 
handler  documentation  for  specific  output  processing.  The  operation  status 
word  is  initialized  by  the  I/O  handler  to  a (-1)  as  soon  as  the  first 
character  is  output.  Refer  to  the  calling  sequence  for  additional  status 
codes  to  be  implemented  at  a later  date.  When  the  output  is  complete 
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(i.e»,  the  number  of  characters  to  be  output  is  satisfied),  the 
operation  slat  us  word  defined  by  the  calling  prop ram  is  changed  to  a 
positive  value  indicating  the  number  of  data  characters  output,,  If  a 
cancel  request  has  been  received  during  output  of  the  buffer,  OMOO  will 
return  control  to  the  control  program  at  CP20  in  order  for  a new  request 
to  be  initiated  at  the  terminal „ 
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3.3.21.2.1  Calling  Sequence 


CALL  OMOO,A, 

PARAMETER 

A 

B 

C 

D 


B,C,D 


FUNCTION 

The  beginning  address  where  the  message  is  stored.  (Packed 
two  characters  per  word.) 

The  address  of  a word  containing  the  number  of  characters  to 
be  sent. 

Always  zero  (0). 

The  address  of  an  operation  status  word. 

The  status  returned  by  the  output  message  routine  will  be  as 
follows: 

Positive  value  = output  complete.  The  value  will  be  the  number 
of  characters  transmitted.  (May  be  zero  if  no 
data  characters  are  transmitted  but  operation 
is  complete.) 

-1  = output  initiated  (first  character  started  out) 

-2  = parity  error  (CRT  only) 

—3  = 103  modem  disconnected  (TTY  output  only) 

-4  = CRT  not  ready  (CRT  only) 

Return  addresses  will  be  as  follows: 

Call  +6  = previous  I/O  request  in  progress. 

Call  +8  = normal  return.  I/O  initiated.  User  must  check  < 
status  word  at  this  point. 
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REGISTER 

CONTENTS  UPON  ENTRY  ■ 

CONTENTS  UPON  EXIT 

A 

Saved 

Restored 

B 

Saved 

Restored 

X 

Saved 

Restored 

Overflow 

Unknown 

Modified 
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3.3.21.2.2  General  Flow  Chart 
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3.3.21.3  Label  Description 

3.3.21.3.1  Local 

OMBA  Beginning  address  of  Output  Buffer  (Referenced  by  0/P  Handler) 

OMCC  Address  of  Output  Character  Count  (Referenced  by  0/P  handler) 

OMCP  Address  of  Cursor  Position  Word  if  required  (Referenced  by 

0/P  handler) 

OMDC  Device  code.  Set  by  ISOO.  (Referenced  by  O/P  handler) 

OMHB  Heading  Buffer  (Referenced  by  0/P  handler) 

OMHC  Heading  Character  Count  (Referenced  by  0/P  handler) 

OMOS  Address  of  Operation  Status  Word  (Referenced  by  0/P  handler) 

3.3.21.3.2  Global 
None 

i 

3.3.21.3.3  Entry  Points 
0M00 

3.3.21.3.4  External  References 

OTLC  Line  count  for  each  page  output  - defined  in  output  teletype  (OTOO) 

OTOO  Output  handler  routine  for  both  CL1NC  TTY's,  DOC  TTY,  and  DOC  103 

Modem. 
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3.3.21.4  Detailed  Flow  Chart 


NO 


SET  BEG' 
ADDRESS 
IN  OTOO 

INNING 
OF  BUFFE  l 
CALL 

SET  NUMBER  OF 
CHARACTERS  IN 
OTOO  CALL 

0M12 

OTOO 
OUTPUT 
.MESSAGE 


SET  OMOO 
NOT  BUSY 
0— - *-OMBU 


OTHER  DEVICE  I/O 
HANDLERS  TO  BE 
DEVELOPED. 


IF  USER  HAS  PRESSED  THE  AT  SIGN 
(@)  CPCA  WILL  DETECT  IT  AND 
SET  THE  A- REGISTER  TO  0. 
OTHERWISE,  A- REGISTER  WILL  BE 
NON- ZERO. 
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THE  TOP  OF  PAGE  HEADING  WILL 
BE  PRINTED  FROM  OMHB  WHEN  A TOP 
OF  PAGE  CONDITION  IS  ENCOUNTERED 
BY  OTOO. 


n 0^*0 


3.3.22  OSOO  - Operator  Search 

3.3.22.1  Purpose 

The  Operator  Search  Subroutine  (OSOO)  checks  the  temporary  input  buffer 
for  the  operators  'AND'  and  'OR1. 

3.3.22.2  Technical  Description 

OSOO  checks  the  temporary  input  buffer  for  the  operators  'AND'  and  'OR*. 
If  the  operator  'AND'  is  found,  Register-A  is  set  to  1,  and  normal  exit 
is  taken.  If  the  operator  'OR'  is  found,  Register-A  is  set  to  zero  and 
a normal  exit  is  taken.  If  neither  operator  is  found,  the  characters 
that  were  checked  are  packed  in  the  request  buffer;  the  condition  count, 
RCCC,  is  incremented  and  an  alternate  exit  is  taken. 

3.3.22.2.1  Calling  Sequence 
CALL  OSOO,  Normal,  Alternate 

PARAMETER  FUNCTION 

Address  to  be  taken  when  match  is  found 
Address  to  be  taken  when  no  match  is  found 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

0 for  'OR';  1 for  'AND' 

B 

N/A 

Modified 

X 

N/A 

Modified 

Overflow 

N/A 

Same 

Normal 

Alternate 
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3.3.22.3  Label  Description 


3.3.22.3.1  Local 

OSAR  Address  of  no  match  exit 

OSBL  Table  of  five  word  to  store  check  characters 

OSNR  Address  of  match  exit 

3.3.22.3.2  Global 
None 

3.3.22.3.3  Entry  Point 
0S00 

3.3.22.3.4  External  References 
Entry  point  of  subroutine  to  pack  character  into  buffer 
Condition  count  defined  in  RCOO 

Entry  Point  of  subroutine  to  unpack  character  from  buffer 
Subroutine  Save  parameter  list 


PK01 

RCCC 

UP01 

$SE 


II. G. 180 
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II. G. 190 
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3.3.23  OTOO  - Output  Teletype  or  103  Modem 

/ • ' 

3.3.23.1  Purpose 

The  purpose  of  OTOO  Is  to  output  a buffer  to  the  CL1NC  TTY's,  DOC  TTY,  or 
DOC  103  Modem, 

3.3.23.2  Technical  Description 

OTOO  gains  control  when  it  is  called  by  the  generalized  Output  Message 
(OMOO)  Routine.  OTOO  uses  OMOO  as  a link  back  to  the  calling  program  to 
obtain  the  address  of  the  data  buffer,  the  address  of  the  character  count, 
and  the  address  of  an  operation  status  word.  The  complete  buffer  is 
transmitted  before  the  status  word  is  set  with  a completed  status  and 
control  is  returned  to oOMGO.  As  soon  as  character  interrupts  are  available 
on  the  DOC  computer  systems,  OTOO  may  be  modified  to  return  control  to  the 
original  calling  program  when  output  of  the  first  character  is  initiated. 
OTOO  is  presently  designed  to  unpack  the  user  buffer  (packed  three 
characters  per  word)  and  output  a character  at  a time  via  the  output 
character  routine  (OZKC).  The  output  instructions  in  OZKC  are  set  up 
for  the  output  device  by  the  Initialize  System  (IS00)  Routine.  The  write 
buffer  is  sensed  for  a ready  status  by  OZKC  to  determine  when  the  next 
character  may  be  output. 

In  addition  to  transmitting  the  output  buffer,  OTOO  performs  several 
other  functions.  A line  count  (OTLC)  is  maintained  by  OTOO  for  the 
purpose  of  paging  the  output.  The  line  count  is  decremented  every  time 
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a line  feed  (LF)  is  detected  in  the  output  buffer,,  If  the  line  count 
reaches  zero,  OTOO  checks  to  see  if  a heading  is  to  be  printed  at  the 
top  of  the  new  page.  If  there  is  a heading  requirement,  OTOO  outputs 
5 carriage  returns  and  line  feeds,  and  prints  the  heading  from  the 
heading  buffer  (OMHB)  where  it  was  previously  saved  by  OMOO.  The 
original  calling  program  may  have  OMOO  save  the  heading  for  subsequent 
output  by  placing  an  ASCII  FORM  character  as  the  first  character  of  the 
heading  in  the  output  buffer.  If  there  is  not  a heading  requirement, 
five  carriage  returns  - line  feeds  are  output  by  OTOO.  The  original  calling 
program  may  cause  a top  of  page  to  occur  on  any  line  by  placing  an  ASCII 
SOM  character  in  the  output  buffer.  Upon  detecting  the  SOM  character, 

OTOO  performs  the  same  processing  as  that  performed  when  the  line  count 
reaches  zero. 

Upon  completion  of  the  output,  the  calling  program  operation  status  word 
is  updated  to  contain  the  number  of  characters  processed  from  the  user 
supplied  buffer.  Control  is  returned  to  the  OMOO  routine  which  checks  for  a 
cancel  output  request,  restores  the  user's  registers,  and  returns  to  the  user. 

3.3.23.2.1  Calling  Sequence 
CALL  OTOO, A, B 

FUNCTION 

Beginning  address  of  output  buffer. 

Number  of  characters  in  output  buffer  to  be 
processed. 


PARAMETER 

A 

B 
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REGISTER 


CONTENTS  UPON  ENTRY 


CONTENTS  UPON  EXIT 


A 

N/A 

Modified 

B 

N/A 

Modified 

X 

N/A 

Modified 

Overflow 

: N/A 

, Modified 

3.3.23.2. 2 General  Flow  Chart 
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3.3.23.3  Label  Description 


3.3.23. 

3.1  Local 

OTA 

Save  A location 

0TB 

Save  B location 

OTBA 

Output  Buffer  Address 

OTCC 

Number  of  characters  in  output  buffer 

OTCP 

Number  of  characters  processed 

OTOF 

Save  overflow  location 

OTSV 

Save  character  location 

OTX 

Save  X location 

3.3.23.3.2  Global 

OTLC  Line  count  - initialized  by  OMOO 


3.3.23.3.3  Entry  Points 
OTOO 

3.3. 23 0 3. 4 External  References 
OMHB  Top  of  Page  output  buffer 

OMHC  Number  of  characters  in  user  top  of  page  output  buffer  (OMHB) 

OMOS  Address  of  user  operation  status  word  - defined  in  OMOO 

OZKA  Subroutine  used  to  output  OMHB 

OZKC  Subroutine  to  output  one  character  to  TTY  or  Modem 

OZKR  Subroutine  to  output  a CR,  LF  to  TTY  or  Modem 

$KLF  Subroutine  to  output  n number  of  CR,  LF  to  TTY  or  Modem 
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3.3.23.4 


Detailed  Flow  Chart 


OVERFLOW  INDICATOR  IS  USED 
TO  DETERMINE  WHETHER  TO  OUTPUT 
LEFT  OR  RIGHT  HALF  OF  PACKED 
WORD  FROM  BUFFER. 
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3-304 


3-305 


3-306 


OUTPUT  HEADING  FROM  OMHB 


3.3.24  OZKC  - Output  Character  to  TTY 


3.3.24.1  Purpose 

This  routine  outputs  one  character  to  the  ASR-35  teletype 


3.3.24.2  Technical  Description 
NA 


3.3.24.2.1  Calling  Sequence 
CALL  OZKC 

The  A- register  contains  the  character  to  be  output. 
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3.3*24.2.2  General  Flow  Chart 


\return 


3.3.24.3  Label  Description 

3.3.24.3.1  Local  Labels 
None 

3.3.24.3.2  Global 
None 

3.3.24.3.3  Entry  Point 
Primary  entry  point  OZKC 

3.3.24.3.4  External  References 
None 
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3.3.24.4  Detailed  Flow  Chart 
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3.3.25  OZKB  - output  character  to  TTY 

3.3.25.1  Purpose 

This  routine  outputs  the  contents  of  the  B- register  to  the  KSR-35  each  time 
it  is  called. 

3.3.25.2  Technical  Description 
N/A 

3.3.25.1  Calling  Sequence 
CALL  OZKB 

PARAMETER 

None  


REGISTER 

A 

B 

X 

Overflow 


CONTENTS  UPON  ENTRY 

undisturbed 

ASCII  character  code 

to  be  output 

undisturbed 

undisturbed 


CONTENTS  UPON  EXIT 


same 
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3.3.25.3.1  Local 


None 


3.3.25.3.2  Global 
None 


3.3.25.3.3  Entry  Points 

OZKB  - primary  entry  point 

3.3.25.3.4  External  References 

OZWW  - check  write  buffer  empty  (from  routine  OZKR) 


3,3e25.4  Detailed  Flow  Chart 


OZWW 
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3,3.26  OZKA  - Print  Buffer  on  TTY 

• ■ r . 

3.3.26.1  Purpose  . 

This  routine  outputs  characters  to  the  ASR-35  teletype. 

3.3.26.2  Technical  Description 

This  routine  outputs  a buffer  to  the  ASR-35  teletype.  Each  buffer  word 
should  contain  two  eight  bit  ASCII  characters.  Both  the  beginning 
location  to  be  output  and  the  number  of  characters  to  print  are  specified 
by  the  calling  routine. 

3.3.26.2.1  Calling  Sequence 
CALL  OZKA, START, N 

FUNCTION 

beginning  address  to  be  printed 

number  of  characters  to  print 

CONTENTS  UPON  ENTRY  CONTENTS  UPON  EXIT 

Saved  Restored 

Saved  Restored 

Saved  Restored 

Destroyed 


REGISTER 

A 

B 

X 

Overflow 


PARAMETER 

START 

N 
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3.3.26.2.2  General  Flow  Chart 

% 
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3.3.  26-3  Label  Description 

3.3.26.3.1  Local  Labels 

Symbol  Function  j 

0Z$1  contains  address  of  next  word  to  be  output 

3.3.26.3.2  Global  Labels 

Symbol  Function 

SAVE  buffer  used  to  save  volatile  registers 

3.3. 26.3.3  Entry  Point 
primary  entry  point  - OZKA 

3.3.26.3.4  External  References 

OZKC  - routine  which  outputs  one  character  to  the  TTY 
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3.3.26.4  Detailed  Flow  Chart 


* — 

SAVE 

REGISTERS 

1 PICKUP  ARGO- 

I MENTS: 

buffer 

I ADDRESS  AND  WORD! 

COUNT 
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3.3.27 


OZKR  - carriage  return  and  line  feed 

3.3.27.1  Purpose 

This  routine  outputs  a carriage  return  and  line  feed  to  the  KSR-35  teletype. 

3.3.27.2  Technical  Description 

n/a  . . 

3.3.27.2.1  Calling  Sequence  ? 

CALL  OZKR 

PARAMETER 
None 

CONTENTS  UPON  ENTRY  CONTENTS  UPON  EXIT 

destroyed  • 

undisturbed 

saved  restored 


REGISTER 

A 

B 

X 


Overflow 


destroyed 


3.3.27.2.2  General  Flow  Chart 


CARRIAGE 
RETURN  LINE 
FEED  TO  TTY 
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3.3.27.3  Label  Description 

/ ■ . •.  . 

3.3.27.3.1  Local 

OZNX  - contents  of  X- register 

3.3.27.3.2  Global 
None 

3.3.27.3.3  Entry  Points 
OZKR  - primary  entry  point 

OZNN  - entry  to  output  null  characters  to  TTY 
OZWW  - entry  to  sense  write  buffer  empty 

3.3.27.3.4  External  References 
None 
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3.3.27.4 


Detailed  Flow  Chart 
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3.3.28  PFOO  - power  fail  - restart 

3.3.28.1  Purpose  - 

Once  a power  failure  occurs  and  power  is  restored,  this  routine  will  initiate 
the  action  for  the  restart  of  the  retrieval  system. 

3.3.28.2  Technical  Description 

When  a power  failure  occurs,  the  program  being  executed  is  terminated  and 
prevailing  program  conditions  are  lost.  Once  power  is  restored,  this  routine 
notifies  the  operator  that  the  system  has  gone  off-line  and  must  be  reinstated. 
The  teletype  bell  is  rung  several  times  and  an  appropriate  message  is  printed. 

3.3.28.2.1  Calling  Sequence 

CALL  PFOO 

PARAMETER 
None 

REGISTER 
A 
B 
X 

Overflow 


CONTENTS  UPON  ENTRY  . CONTENTS  UPON  EXIT 

lost 
lost 
lost 
lost 
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3.3.23.2.2  General  Flow  Chart 


3.3.28.3  Label  Description 

3.3.28.3.1  Local 

PFSX  contents  of  X- register. 

3.3.28.3.2  Global 

HMBU  mag  tape  handler  busy  indicator 

IMBU  input  message  busy  indicator 

ISN6  count  of  words  to  be  printed 

ISQ6  address  of  message  buffer  to  be  printed 

1STU  mag  tape  unit  to  be  readied 

OMBU  output  message  busy  indicator 

OMHC  output  message  heading  indicator 

TAPU  output  message  heading  indicator 

3.3.28.3.3  Entry  Points 

location  040  is  power  fail  entry;  PF00  - primary  entry  point  for  restart 

3.3.28.3.4  External  References 

CP00  control  program  entry 

CP20  end-action  in  CP00 

ER00  error  message  output  routine 

IS90  -output  to  teletype  routine 
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3. 3. 20. A Detailed  Flow  Chart 

v 


RESTART 

REQUEST 

MESSAGE 


111 


3.3.29  PKOO  - Pack  Character 

/ ' . • 

/ . ; - . 

3.3.29.1  Purpose 

PKOO  is  a subroutine  whose  purpose  is  to  accept  ASCII  characters  one 
at  a time  and  pack  them  into  a buffer  two  characters  per  word  in  order 
to  conserve  computer  memory. 

3.3.29.2  Technical  Description 

PKOO  has  two  entry  points,  PKOO  and  PK01.  The  first  time  the  routine 
is  called,  control  must  be  passed  to  PKOO  with  the  first  character  to 
be  packed  in  the  A- register  and  the  starting  address  of  the  destination 
buffer  in  the  B- register.  For  all  subsequent  calls,  control  must  be 
passed  to  PK01  with  the  data  character  in  the  A- register.  The  data 
will  be  packed  two  characters  per  word  starting  in  the  buffer  address 
specified  in  the  first  call. 

3.3.29.2.1  Calling  Sequence 
CALL  PKOO  (for  initial  call) 

CALL  PK01  (for  all  subsequent  calls) 
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3.3.29.2.1 

REGISTER 

A 

B 


X 

Overflow 


Calling  Sequence  (Continued) 

/ ' ' 

CONTENTS  UPON  ENTRY 
Character  to  store 


Destination  Buffer 
address  (initial 
call  only) 

Saved  upon  entry 
N/A 


CONTENTS  UPON  EXIT 
Restored  to  original 
value 

Restored  to  original 
value 

Restored  to  original 
value 

N/A 
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3.3.29.2.2  General  Flow  Chart 


3.3.29,3  Label  Description 

3.3.29.3.1  Local 

PKSA  - temporary  storage  location  for  the  contents  of  the  A-register. 

PKSB  - temporary  storage  location  for  the  contents  of  the  B- register. 

PKSX  - temporary  storage  location  for  the  contents  of  the  X- register. 

PKXX  - storage  location  for  the  starting  address  of  the  destination  buffer. 

3.3.29.3.2  Global 

PKBX  - starting  address  of  the  destination  buffer 
PKIX  - index  into  the  destination  buffer 

PKSW  - switch  which  controls  into  which  half  of  a data  word  a character 
is  to  be  put. 

3.3.29.3.3  Entry  Points 

PKOO  - entry  point  for  the  first  call  to  this  routine. 

PK01  - entry  point  for  all  subsequent  calls  to  this  routine. 

3.3.29.3.4  External  References 
None 


3-333 


3.3.29.4  Detailed  Flow  Chart 


3.3.30  RA00  - Request  Action 
3.3.30.1  Purpose 

RAOO  is  a subroutine  whose  purpose  is  to  check  the  requested  ACTION  for 
List,  Copy,  Count,  Tabulate  or  Analyze,  and  sets  the  Request  Table  entry 
accordingly. 

3«3C30.2  Technical  Description 

RAOO  validates  the  response  from  the  user  to  the  "ACTION"  query.  RAOO 
checks  to  see  if  less  than  four  characters  were  input  to  the  temporary 
input  buffer.  If  less  than  four  characters  have  been  input,  an  error 
message,  'INVALID  ACTION',  is  displayed,  the  question  number  (to  permit  a 
reissuance  of  "ACTION"  query)  is  decremented,  and  control  is  returned  to 
the  calling  routine  (RQ00). 

After  the  character  count  check  is  complete,  the  3rd  and  4th  characters 
of  the  response  are  compared  with  the  entries  in  the  valid  response 
table  (RAPR).  If  a match  is  not  found,  the  error  message  "INVALID  ACTION" 
is  displayed.  If  a match  is  found,  an  index  equal  to  the  relative  position 
of  the  match  entry  in  RAPR  is  placed  in  the  sixth  word  of  the  Request  Table 
for  subsequent  processing  and  control  returned  to  CP00o 
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3.3.30.2.1 

Calling  Sequence 

/ 

CALL  RAOO 

/ 

REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

Modified 

B 

N/A 

Same  as  Entry 

X 

N/A 

Modified 

Overflow 

N/A 

Same  as  Entry 
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3.3.30.2.2  General  Flow  Chart 


CHAR.  ^ 
INPUT  LESS 


■3 

■ 


TEMP 
BUFFER  REQUEST: 
TABLE- ACTION 


ADD  1 TO 
INDEX 


SET  REQUEST 
TABLE  TO  INDEX 


RETURN/ 


DISPLAY 
INVALID 
V ACTION 


RETURN/ 


3.3.30,3  Label  Description 


3.3.30.3.1  Local 

RAPR  is  a five  word  table  containing  the  following: 


Word 

Content 

Meaning 

0 

•ST* 

LIST  . 

1 

' PY 1 

COPY 

2 

•UN* 

COUNT 

3 

•BU' 

TABULATE 

4 

•AL' 

ANALYZE 

3.3.30.3.2  Global 
None 

3.3.30.3.3  Entry  Point 
RA00 

3.3.30.3.4  -External  References 

CPRT  Request  Table  defined  in  CP00.  The  6 word  will  be  set  as  follows 

0 LIST 

1 COPY 

2 COUNT 

3 TABULATE 

4 ANALYZE 

CPSW  Status  word  found  in  CPOO  containing  number  of  characters 

input  by  user 
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3*3.30,3.4  External  References  (Continued) 

KR00  Subroutine  to  output  the  error  message 

RQQN  Request  question  number  defined  in  RQ00.  On  entry  value 

will  be  5 and  is  changed  to  4 only  when  error  occurs. 
RQTB  Request  temporary  buffer  defined  in  RQ00 

RQ37  Mask  7 bits  of  request  defined  in  RQ00 


3-339 


3.3.30.4  Detailed  Flow  Chart 


3.3.31  RCOO  - Request  Condi tion/What 
3.3.31.1  Purpose 

The  purpose  of  this  subroutine  is  to  process  the  user's  response  to 
CONDITION  and  WHAT,  and  set  the  appropriate  flags  and  pointers. 


3.3.31.2  Technical  Description 

There  are  five  legal  parameters  which  can  be  input  as  responses  to  the 
CONDITION  (WHAT)  question.  They  are  (1)  left  parenthesis,  (2)  right 
parenthesis,  (3)  operator  (AND  or  OR),  (4)  operand,  and  (5)  terminal. 

This  subroutine  has  two  major  functions  with  respect  to  those  parameters. 
First,  it  is  to  identify  each  parameter,  passing  on  this  information  to 
BLOO.  Second,  it  is  to  store  all  operands  in  the  Request  Buffer.  Associated 
with  these  two  functions  is  the  setting  of  flags  and  poiriuC*..  a * . d **  *-  -*-  "■*  c d 
amount  of  error  checking. 


To  RCOO  the  user  response  is  merely  a string  qf  characters  packed  two  per 
word  in  the  Temporary  Input  Buffer.  A carriage  return  character  is  placed 
at  the  end  to  signify  the  end  of  the  data.  Between  the  beginning  of  the 
Buffer  and  this  carriage  return  can  be  a complicated  organization  of  the 
five  legal  parameters,  making  up  a network  of  Boolean  strings  with  up  to 
ten  operands. 


There  are  certain  rules  that  the  parameters  must  follow: 

(1)  left  parenthesis  can  follow  operators  or  another  left  parenthesis. 

(2)  right  parenthesis  can  follow  operands  or  another  right  parenthesis 

(3)  operators  must  be  preceded  by  and  followed  by  a blank 
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(4)  operands  may  be  one  of  four  forms: 

a.  heading  alone 

b.  heading  plus  alpha  answer 

r * • 

c.  heading  plus  numeric  answer 

When  an  operand  is  placed  in  the  Request  Buffer,  several  pointers  and 

flags  must  be  set  based  on  the  following: 

(1)  The  first  word  of  the  next  available  two  word  set  in  the  Operand 

Buffer  must  be  set  to  the  beginning  location  of  the  operand  in  the 

Request  Buffer. 

(2)  The  next  available  location  in  the  Condition  (What)  Table  is  a flag 

that  describes  the  form  of  the  operand.  If  the  operand  is  of  the  form: 

a.  heading  alone,  the  flag  is  zero 

b.  heading  plus  alpha  answer,  the  flag  is  one  and  the  location 
following  the  flag  is  an  address  which  is  the  beginning  location 
in  the  Request  Buffer  of  the  answer  portion  of  the  operand. 

c.  heading  plus  numeric  answer,  the  flag  is  two  and  the  location 
following  the  flag  is  an  address  which  is  the  beginning  location 
in  the  Request  Buffer  of  the  answer  portion  of  the  operand. 

d.  heading  plus  a range  of  numeric  answer,  the  flag  is  three  and 
the  next  two  locations  following  the  flag  contain  addresses 
which  are  the  beginning  locations  in  the  Request  Buffer  of  the 
lower  limit  and  upper  limit,  respectively,  of  the  range  of 
numeric  answer. 
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In  the  case  when  the  WHAT  response  is  being  processed,  there  are  a 
couple  of  special  considerations.  First,  if  the  response  is  "ID  ONLY" 
the  ID  flag,  LIID,  for  LIOO  routine  is  set.  Secondly,  if  the  ACTION 
response  is  Tabulate  or  Analyze,  the  number  of  operands  is  limited, 
based  on  the  device  to  which  the  printed  data  is  to  be  output.  A check 
must  be  made  with  each  parameter  to  verify  that  the  maximum  number  of 
operands  has  not  been  exceeded.  In  addition,  for  Analyze,  only  numeric 
data  can  be  specified  in  the  What  response. 

3.3.31.2.1  Calling  Sequence 
CALL  RCOO 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

fcT  t A 
ii  / n 

N/A 

B 

N/A 

N/A 

X 

N/A 

N/A 

Overflow 

N/A 

N/A 

CALL  OSOO 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

N/A 

B 

N/A 

N/A 

X 

N/A 

N/A 

Overflow 

N/A 

N/A 

3-343 


3.3<.31.2o2  General  Flow  Chart 
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© 


© 
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3.3o31»3  Label  Description 

/ . 

3.3.31.3.1  Local 

RCBL  (40g)  blank 

RCCC  character  counter.  Counts  the  number  of  characters  processed 
so  far  in  heading  and/or  answer  portion  of  operand. 

RCCH  save  location  for  character  currently  being  processed. 

RCCL  (72_)  colon  < 

o 

RCCR  (15g)  carr*age  return 

RCCS  colon  switch.  Flag  that  indicates  a colon  has  been  input  and 

an  answer  must  follow. 

RCDT  (10,5,5,5,5,2,2,2,2,9)  device  table.  The  maximum  number  of 

operands  that  can  be  analyzed  or  tabulated  for  each  output 
device. 

RC1D  (44504g,  47516g,  46131g)  "ID  ONLY" 

RCLP  (50g)  ^■e^t  parenthesis 

RCPA  maximum  number  of  operand  parameters  for  current  output  device 

RCPC  location  used  to  verify  that  an  equal  number  of  left  parentheses 
and  right  parentheses  are  present.  Incremented  for  left  paren; 
decremented  for  right  paren;  zero  at  end  of  response  if  equal. 

RCPM  parameter  code  passed  off  to  BL00  indicating  the  type  of 
parameter  currently  being  processed. 

RCPX  actual  number  of  operand  parameters. 

RCRP  (51g)  right  parenthesis 

RCSX  save  location  for  Request  Buffer  Pointer 
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3. 3.31.3.1  Local  (Continued) 

RCTM  (177q)  terminal  character  in  Request  Buffer 

/ 

RCXX  condition  or  What  table  pointer.  Contains  address  of  next 
available  location  or  set  of  locations  for  flags  and 
pointers  associated  with  an  operand. 

3.3.31.3.2  Global 

None  . ' 

3.3.31.3.3  Entry  Points 
RCOO 

3.3.31.3.4  External  References 

BLGO  routine  that  builds  the  tree  from  the  Boolean  strings  in  the 
CONDITION  response 

CMOO  routine  that  compares  two  sets  of  characters  and  returns  equal 

to,  greater  than,  or  less  than. 

CPBB  Bool  Buffer 
CPCT  Condition  Table 
CPOB  Operand  Buffer 

CPRB  Request  Buffer 

CPRT  Request  Table 

CPSW  Status  word  from  input.  Equals  number  of  characters  input. 

CPWT  What  Table 

CPXB  Bool  Buffer  pointer 

CPXC  Condition  Table  pointer 
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3.3.31.3*4  External  References  (Continued) 

CPXO  Operand  Buffer  pointer.  ' 

CPXR  Request  Buffer  pointer  • 

CPXW  What  Table  pointer 

EROO  routine  used  to  output  a precoded  error  message  to  the  primary 
output  device 

FILL  routine  to  store  a character  or  number  in  consecutive  locations 

LIID  ID  only  flag.  Indicates  that  the  WHAT  response  was  "ID  ONLY." 

OMDC  output  device  code 

OSBL  table  containing  the  characters  stored  in  the  Request  Buffer  by 
OSOO  - 

OSOO  routine  that  searches  the  input  stream  for  an  operator  ("AND  or 
"OR") 

wnv  — wno 

*-•»«**  hSu*.  w &.  uviutcoo  jlUL  *«wv/ 

PKIX  index  used  with  PK00 

PKSW  switch  indicating  into  which  half  of  the  word  the  next  character 
is  to  be  packed 

PKOO  routine  that  packs  characters  tow  per  word 

RQQN  request  question  number 

RQTB  Temporary  Input  Buffer 

SI00  routine  to  clear  stacks  used  by  BL00 

UPBX  buffer  address  for  UPOO 

UPIX  index  used  with  UPOO 

UPSW  switch  indicating  which  half  of  the  word  the  next  character  is 

to  be  unpacked  from 

UPOO  routine  to  unpack  characters  from  a buffer 
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3.3.31.4  Detailed  Flow  Chart 
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ALL  PARAMETERS 
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3.3.32  RDOO  - Request  Date 

3.3.32.1  Purpose 

RDOO  is  a subroutine  whose  purpose  is  to  process  the  user  response  for 
the  date  portion  of  the  user  request  criteria. 

3.3.32.2  Technical  Description 

After  the  "DATE"  question  is  output,  the  user  inputs  his  response  to  the 
question.  The  answer  is  moved  character  by  character  into  a Temporary 
Input  Buffer.  RDOO  first  picks  up  the  day  representation  from  the 
Temporary  Input  Buffer.  If  the  day  portion  of  the  response  is  not  numeric, 
less  than  one,  or  greater  than  thirty-one,  it  is  ruled  invalid,  an  error 
message  is  sent  to  the  user  and  control  is  passed  to  the  calling  program. 

If  the  day  is  valid,  it  is  packed  into  the  Request  Buffer.  The  same 
procedure  is  followed  for  the  month  and  year  entries.  Valid  entries  are 
stored  in  the  Request  Buffer  and  invalid  entries  cause  an  exit  with  an 
appropriate  error  message.  Note,  however,  that  the  month  is  stored  in 
binary  and  not  alphabetic  form,  i.e.,  January  is  stored  as  01,  February 
is  02,  etc.  The  only  exception  to  this  rule  are  the  months  October, 
November,  and  December,  which  are  represented  as  13,  14,  and  15  which  is 
necessary  for  MEDATA  compatibility.  If  a date  range  is  requested  (for 
example,  05Jan71-J0Mar71 ) both  dates  are  processed  in  the  same  fashion 
and  a flag  pointing  to  the  beginning  address  of  the  second  date  in  the 
Request  Buffer  is  set. 
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3.3.32.2.1  Calling  Sequenc 
CALL  RDOO 


REGISTER  CON'/.. . 


.•ITS  UPON  EXIT 
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3.3.32.2.2  General  Flow  Chart 
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3,3,32.3  Label  Description  • 

3.3.32.3.1  Local 

RDCT  - storage  location  used  to  keep  count  of  how  many  data  characters 
have  been  processed. 

RDDF  - storage  location  which  is  set  (incremented)  upon  detecting  a 
range  of  dates  as  a user  response. 

RDMK  - (value  177)  storage  location  containing  the  sentinel  character 
which  follows  the  data. 

RDMT  - starting  address  of  the  twelve  word  date  table.  This  table  is 
used  during  the  month  validation  processing. 

3.3.32.3.2  Global 

N/A 
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3.3.32.3.3  Entry  Points 
RDOO  - primary  entry  point  . 

3.3.32.3.4  External  References 

3.3.32.3.4.1  External  Labels 

CPRT  - starting  address  of  the  Request  Table 

CPSW  - storage  location  containing  the  number  of  data  characters  input 
CPXR  - storage  location  for  the  request  buffer  pointer 
RQQN  - storage  location  for  the  question  number  index 
RQTB  - starting  address  of  the  Temporary  Input  Buffer 

3.3.32.3.4.2  External  Subroutines 
EROO  - output  error  message  routine 


PKOO  - pack  character  routine 


UPOO  - unpack  character  routine 
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3.3.32.3.3  Entry  Points 
RDOO  - primary  entry  point 

3. 3. 32.3. A External  References 

3.3.32.3.4.1  External  Labels 
CPRT  - starting  address  of  the  Request  Table 

CPSW  - storage  location  containing  the  number  of  data  characters  input 

CPXR  - storage  location  for  the  request  buffer  pointer 

RQQN  - storage  location  for  the  question  number  index 


RQTB  - starting  address  of  the  Temporary  Input  Buffer 


3.3.32.3.4.2  External  Subroutines 
EROO  - output  error  message  routine 

PKOO  - pack  character  routine 


UPOO  - unpack  character  routine 
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3.3.32.4  Detailed  Flow  Chart 
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3.3.33  RMOO  - Record  Match 

/ • 

3.3.33.1  Purpose 

RMOO  Is  a subroutine  whose  purpose  is  to  determine  if  the  current 
master  record  matches  the  user  selection  criteria  of  the  retrieval 
request. 

3.3.33.2  Technical  Description 

Each  response  in  the  selection  criteria  of  the  retrieval  request  must 
be  matched  before  a record  is  accepted  for  further  processing  by  other 
modules  of  the  system.  If  a match  does  not  occur  on  any  one  of  the 
responses,  the  tape  record  is  rejected.  If,  however,  a match  is  found 
for  all  five  responses,  the  record  is  accepted  and  control  is  transferred 
to  the  Control  Program  (CPOO).  RMOO  performs  the  match  test  In  the 
following  order:  SS  NO,  RECORD,  TYPE,  DA IE , CONDITION.  The  results  of 

the  match  are  passed  to  the  Control  Program  via  the  X- register.  If  a 
match  is  found,  a one  is  returned  in  the  X- register;  if  the  ID  portion 
of  the  request  (SS  NO,  RECORD,  TYPE,  DATE)  is  less  than  the  correspond- 
ing entry  in. the  current  master  record,  a two  is  returned;  otherwise, 
a zero  is  returned. 
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3.3.33.2, 

CALL 

REGISTER 

A 

B 

X 

Overflow 


1 Calling  Sequence 

RMOO  . ...  • ... 

CONTENTS  UPON  ENTRY  CONTENTS  UPON  EXIT 

Saved  upon  entry  Restored  upon  exit 

Saved  upon  entry  Restored  upon  exit 

N/A  Status  of  the  compare 

N/A  M/A 
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3.3.18.2.2  General  Flow  Chart 
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3.3.33.3  Label  Description 

/ • ' *'.*•;*  . ; 

3.3.33.3.1  Local 

RMBF  - a 13  word  buffer  used  for  temporary  storage  for  each  request 
parameter  as  it  is  being  processed. 

RMCT  - storage  location  used  to  save  the  starting  address  of  each  request 
parameter  as  it  is  being  processed. 

RMFG  - flag  that  is  set  if  request  data  has  been  found. 

RMKA  - temporary  starting  location  for  the  contents  of  the  A- register. 

RMKX  - temporary  starting  location  for  the  contents  of  the  X- register. 

RMPT  - counter  which  signifies  how  many  characters  have  been  processed  for 
this  request  parameter. 

RMSA  - temporary  starting  location  for  the  contents  of  the  B- register. 

RMSB  - temporary  starting  location  for  the  contents  of  the  B- register. 

3.3.33.3.2  Global 
N/A 

3.3.33.3.3  Entry  Point  v 

RMOO  - primary  entry  point 
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3.3.33.3.4  External  References 

3.3.33.3.4.1  External  Labels 

CPRB  - beginning  address  of  the  Request  Buffer 

CPRT  - storage  location  which  contains  the  first  word  of  the 
request  SS  NO 

CPTB  - beginning  address  of  the  Tape  Input  Buffer 

3.3.33.3.4.2  External  Subroutines 
CMOO  - Compare  two  values 

MCOO  - Match  condition  - 

MDOO  - Match  date 
PKOO  - Pack  character 
UPOO  - Unpack  character 


3-3S6 
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3.3.34  RQOO  Request 


3.3.34.1  Purpose 

RQOO,  the  Request  Subroutine,  outputs  all  the  questions  to  be  answered 
and  accepts  the  answer  from  the  user.  Each  response  is  edited  for  line 
error,  abort,  and  input  complete  codes.  If  the  default  parameter  has 
been  entered,  the  subroutine  sets  the  default  flag  and  proceeds  to 
the  next  question.  If  the  default  parameter  is  not  the  response,  the 
subroutine  sends"  control  to  the  subroutine  corresponding  to  question 
number  to  edit  the  answer.  When  all  questions  have  been  answered,  the 
subroutine  returns  control  to  RPOO,  the  Control  Program. 

3.3.34.2  Technical  Description 

The  subroutine  saves  the  A,  B and  X- registers,  and  the  question  number 
pointer  is  initialized  to  zero.  The  following  pointers  are  initialized 
as  follows: 

POINTER  INITIALIZED  TO 


CPXB 

Bool 

CPBB , 

address 

of 

first 

word 

of 

BOOL  Buffer 

CPXO 

Operand 

CPOB , 

address 

of 

first 

wo  rd 

of  Operand  Buffer 

CPXR 

Request 

CPRB, 

address 

of 

first 

word 

of 

Request  Buffer 

CPXC 

Condition 

CPCT , 

address 

of 

first 

word 

of 

Condition  Table 

CPXW 

What 

CPWT , 

address 

of 

first 

word 

of 

What  Table 
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3.3.34.2  Technical  Description  (Continued) 

The  subroutine  displays  the  question  based  on  question  number  by 
accessing  the  address  of  the  appropriate  message  from  RQAM.  The 
messages  are  listed  below: 


QUESTION  NUMBER 

MESSAGE  ■ 

0 ' ' 

'SS-NO' 

1 

'RECORD' 

2 

•TYPE' 

3 

'CONDITION' 

4 

•DATE' 

5 

•ACTION' 

6 

•WHAT' 

The 

Input  Message  Routine  (IMOO)  is 

called  to  accept  the  response 

from  the  user.  The  status  word  set 

by  IMOO  is  checked  to  determine 

the 

action  to  be  taken. 

STATUS  WORD 

ACTION  TO  BE  TAKEN 

>0 

Input  complete  - process  data 

-1 

Input  busy  - wait  for  completion 

-2 

Line  Error  - repeat  question 

-3 

Abort  - Repeat  SS-NO. 

0 

Default  value  - set  Request  Table 

entry  to  zero 


3.3.34.2  Technical  Description  (Continued) 

When  the  status  word  is  greater  than  zero,  the  response  is  compared 
against  the  corresponding  entry  in  the  default  table  (RQDT).  See 
Table  1.  If  the  default  condition  is  true,  zero  is  set  in  the  word 
of  the  Request  Table  corresponding  to  question  number,  and  the  next 
question  is  processed. 


RQDT  TABLE 

QUESTION 

DEFAULT  CONDITION 

0 

•ALL' 

1 

•ALL' 

2 

•ALL' 

3 

•ALL' 

4 

•NONE' 

5 

'LIST' 

6 

•ALL' 

Table  1 

If  the  response  is  not  the  default  condition,  the  address  of  ap- 
propriate subroutine  needed  to  process  the  answer  is  retrieved  from 
end-action  table  (RQET)  and  the  subroutine  called.  See  Table  2.  On 
return  RQOO  determines  if  all  questions  have  been  answered.  If  they 
have,  the  registers  are  restored  and  control  is  returned  to  CPOO.  If 
they  have  not,  the  next  question  is  displayed. 
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/ 

END  ACTION  TABLE 

( RQET ) 

QUESTION  NUMBER 

SUBROUTINE 

0 

RSOO 

i 

1 

RROO 

2 

RROO 

3 

RDOO 

4 

• ; • . «. 

RCOO 

5 

RAOO 

6 

• 

RCOO 

Table  2 

3.3.34<,2„1  Calling  Sequence 
CALL  RQOO 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

Same 

B 

N/A 

Same 

X 

N/A 

Same 

Overflow 

N/A 

Modified 
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3.34.2.2  General  *iow  Uiart 


RQOO 


0 
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V frvj 
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ZERO 

QUESTION 
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SET  BUFFER 
ADDRESS 

\ _ 



1 bs*'] 

DISPLAY 
QUESTION 


ZERO  ENTRY  IJ? 
REQUEST- 
TABLE 


RQOO 
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3.3.34. 

3.3.34. 

RQAC 

RQAM 

RQCN 


RQCO 

RQCU 

RQDA 

RQDT 

RQD5 

RQET 

RQRE 


Label  Description 

/ ' 

.1  Local 
•ACTION'  Message 

7 word  Table  of  Address  of  Message  (See  Section  3.3. 
7 word  Table  containing  Length  of  Messages 
Entry  as  follows: 


8 

SS-NO 

10 

RECORD 

8 

TYPE 

8 

DATE 

13 

CONDITION 

10 

ACTION 

8 

vfriAT 

CONDITION 

' Message 

Max.  number  of  240.  the  max  input  character 


•DATE'  Message 


7 word  table  of  address  of  default  test.  See  Table 


'SS  NO'  Message 


7 word  Table  of  Address  of  end  action.  See  Table  2 


•RECORD'  Message 


34.2) 
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3.3.34.3.1  Local  (Continued) 

RQSA  Temporary  location  to  save  register  A on  entry. 

RQSB  Temporary  location  to  save  register  B on  entry. 

RQSX  Temporary  location  to  save  Register  X on  entry. 

RQTP  'TYPE'  Message 

RQWH  'WHAT'  Message 


RQXT  Temporary  Index 

R_Q3 "7  MflcV  jnocV  OtZt  tv.’O  ch-TSCtCTS  - 7 bits* 


3.3.34.3.2  Global 

RQQN  Question  number,  referenced  by  RSOO,  .RROO,  RDOO,  RCOO,  and  RAOO. 

I 

RQTB  Temporary  input  buffer;  referenced  by  following  subroutines: 
RSOO,  RROO,  RDOO,  RCOO,  and  RAOO.  ' 

3.3.34.3.3  Entry  Point 
RQOO 
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3«3<,34.3o4  External  References 

CPBB  Defined  in  Appendix  C,  Bool  Buffer 

CPCT  Defined  in  Appendix  F,  Condition  Table 

CPNC  Defined  in  CPOO,  the  number  of  characters  input  through  IMOO 
CPOB  Defined  in  Appendix  D,  Operand  Buffer 

CPRB  Defined  in  Appendix  E,  Request  Buffer  „ . . 

CPSW  Defined  in  CPOO,  Status  Word  for  Input  and  Output  Routine 
CPWT  Defined  in  Appendix  G,  What  Table  ' - 

CPXB  Defined  in  CPOO,  Pointer  into  Bool  Buffer 

CPXC  Defined  in  CPOO,  Pointer  into  Condition  Table 

CPXO  Defined  in  CPOO,  Pointer  into  Operand  Buffer 

CPXR  Defined  in  CPOO,  Pointer  into  Request  Buffer 

CPXW  Defined  in  CPOO,  Pointer  into  What  Table 

x*  p AQ  to  Output  Errc1* 

IMOO  Subroutine  to  accept  input  for  User 

OMOO  Subroutine  to  Output  Question 

RAOO  Subroutine  to  process  'ACTION1  Response 

RCOO  Subroutine  to  process  'CONDITION*  and  'WHAT'  Response 

RDOO  Subroutine  to  process  'DATE'  Response 

RROO  Subroutine  to  process  'RECORD  and  'TYPE'  Response 

RSOO  Subroutine  to  process  'SS-NO'  Response 
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3.3.34.4  Detailed  Flow  Chart 
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3.3.35  RROO  - Request  Record  and  Type 

3.3.35.1  Purpose  ' 

RROO  subroutine  packs  the  user's  response  to  the  "RECORD"  and  "TYPE" 
queries  into  the  request  buffer. 

3.3.35.2  Technical  Description 

The  subroutine  packs  the  response  from  "record"  and  "type"  queries 
into  the  request  buffer.  If  the  number  of  characters  is  greater  than 
twenty-four,  an  error  message  is  output  to  the  user,  the  question 
number  is  decremented  by  one,  and  control  returned  to  RQOO. 

If  the  number  of  characters  is  24  or  less,  the  next  available  address 
in  the  request  buffer  is  picked  up  from  CPXR  to  initialize  the  pack 
subroutine,  PKOO.  Only  non- space  characters  are  packed  into  the  request 
buffer.  When  the  complete  response  has  been  packed  in  the  request 
buffer,  1770  is  stored  at  the  end  of  the  buffer. 

® <i 

The  address  in  CPXR  is  stored  in  the  second  word  of  Request-Table  for 
record,  or  in  the  third  word  of  the  Request-Table  for  type.  The  next 
available  address  is  computed  by  dividing  (the  number  of  character 
inputs  +2)  by  2 and  storing  it  in  CPXP.  Control  is  then  returned  to  RQOO. 
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3.3.35.2.1  Calling  Sequence 

/ 

CALL  RROO 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

. N/A 

Modified 

B 

N/A 

Modified 

X 

N/A 

Modified 

Overflow 

N/A 

Modified 

3.3.35.2.2  General  Flow  Chart 
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3.3.35.3  Label  Description 

3.3.35.3.1  Local 
None 

3.3.35.3.2  Global 
None 

3.3.35.3.3  Entry  Point 
RROO 

3.3.35.3.4  External  References 

CPRT  Defined  in  CPOO,  Request  Table 

CPSW  Defined  in  CPOO,  contains  number  of  character  input 

CPXR  ~ Defined  in  CPOO,  contains  the  next  available  location  in  the 
Request  Buffer 

EROO  Subroutine  to  output  error  message 

i 

PKOO  Subroutine  entry  used  to  initialize  the  packing  into  the 
Request  Buffer 

PK01  Subroutine  entry  used  to  pack  into  the  Request  Buffer 
RQQN  Defined  in  EQOO,  question  number  (i.e»,  1 or  Record,  or  2 for 
Type.) 

RQTB  Defined  in  RQOO,  temporary  Input  Buffer 

RSMK  Defined  in  RSOO,  7 bit  mask  for  ASCII  code. 

UPOO  Subroutine  entry  used  to  initialize  the  impacking  of  the 
characters  from  the  temporary  Request  Buffer 
UP01  Subroutine  entry  used  to  unpack  characters  from  the  temporary 

Request  Buffer 
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3*3.35.4  Detailed  Flow  Chart 
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3.3.36  RSOO  - Request  Social  Security  Number 

3.3.36.1  Purpose 

RSOO  is  a subroutine  whose  purpose  is  to  edit  the  Social  Security  Number  and 
move  it  from  the  temporary  input  buffer  to  the  request  buffer. 

3.3.36.2  Technical  Description 

The  subroutine  edits  Social  Security  Number  for  11  digits  including  dashes. 
If  the  Social  Security  does  not  meet  this  criteria,  the  error  message 
'INVALID  SS-NO'  is  displayed,  the  question  is  decremented  and  control  is 
returned  to  RQOO. 

The  Social  Security  Number  is  moved  from  the  temporary  input  buffer  to  the 
beginning  of  the  request  buffer.  The  first  word  of  the  request  table 
(CPRT)  is  set  to  the  address  of  the  first  word  of  the  request  buffer 
(CPRB).  The  next  available  address,  CPXR  is  set  to  the  address  of  the 


7th  word  of 

CPRB. 

3.3.36.2.1 

Calling  Sequence 

CALL  RSOO 

REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A  . 

Modified 

B 

N/A 

Modified 

X 

N/A 

Modified 

Overflow 

N/A 

Same 
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3.3.36.2.2  General  Flow  Chart 


3-434 


RSOO 


3.3.36.3  Label  Description  ’ 

3.3.36.3.1  Local 
None 

3.3.36.3.2  Global 

RSMK  7 bit  mask  used  to  mask  out  ASCII  code.  The  subroutine  RROO 
also  uses  it  as  a mask. 

3.36.3.3  Entry  Point 
RSOO 

3. 3. 36. 3. A External  References 

CPRB  Defined  in  CROO,  Request  Buffer 

CPRT  Defined  in  CPOO,  Request  Table 

CPSW  Defined  in  CPOO,  contains  number  of  characters  input 

CPXR  Defined  in  CPOO,  next  available  address  in  Request  Buffer 

EROO  Subroutine  called  to  output  error  message 

PKOO  Subroutine  entry  used  to  initialize  the  pack  of  the  Request  Buffer 

PK01  Subroutine  entry  used  to  pack  the  Request  Buffer 

RQTB  Defined  in  RQOO,  Temporary  Input  Buffer 

UPOO  Subroutine  entry  used  to  initialize  the  unpacking  of  the 

Temporary  Input  Buffer 

UP01  Subroutine  entry  used  to  unpack  the  Temporary  Input  Buffer 
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3.3.36.4  Detailed  Flow  Chart 
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3.3.37  SEOO  - System  Error 

3.3.37.1  Purpose 

The  purpose  of  this  subroutine  is  to  output  an  error  message  to  the 
system  input/output  device,  the  teletype. 

3.3.37.2  Technical  Description  . • 

Error  messages  are  precoded  and  a table  of  pointers  (SETB)  can  be 
indexed  to  access  the  beginning  locations  of  each  message  buffer.  The 
appropriate  message  may  then  be  output  through  a call  to  1S90.  All 
messages  are  twelve  words  (24  characters)  in  length.  The  calling 
routine  passes  off  the  number  of  the  error  message  to  be  output  which 
is  used  as  the  index  into  the  pointer  table. 


3.3.37.2.1  Calling  Sequence 
CALL  SEOO 

REGISTER  CONTENTS  UPON  ENTRY  CONTENTS  UPON  EXIT 


A 

N/A 

N/A 

B 

N/A 

N/A 

X 

number  of  error  message 

N/A 

to  be  output 

Overflow 

N/A 

N/A 

3.3.37.2.2 

General  Flow  Chart 

See  Section 

3.3.37.4 
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3.3.37.3  Label  Description 


3.3.37.3.1  Local  • ' 

SENC  - (24)  the  number  of  characters  in  each  error  message. 

SETB  - (SE10,  SE11,  SE12)  table  of  pointers  to  beginning  locations  of 
each  error  message  buffer. 

SE10  - (carriage  return,  line  feed,  "PARITY  ERROR",  carriage  return, 
line  feed) 

SE11  - (carriage  return,  line  feed,  ''MODEM  DISCONNECTED",  carriage  return, 
line  feed) 

SE12-  (carriage  return,  line  feed,  "CRT  NOT  READY",  carriage  return, 

line  feed)  . . .. 

3.3.37.3.2  Global 
None 

3.3.37.3.3  Entry  Points 

SEOO  - 

3.3.37.3.4  External  References 

1S90  - output  handler  to  system  input/output  device,  the  teletype. 
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3.3.37.4  Detailed  Flow  Chart 
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3.3»38  TAOO  - Tabulate  and  Analyze 

. / ■ • ' . . ' 

3«3c38»l  Purpose 

TAOO  Is  a subroutine  whose  purpose  is  to  tabulate  or  analyze  those 
parameters  specified  in  a Retrieval  Request  and  then  output  those  values 
in  an  ordered  sequence. 

3«3«3802  Technical  Description 

TAOO  initially  collects  all  user  specified  WHAT  headings  which  are  to  be 
tabulated  or  analyzed  and  outputs  those  in  the  form  of  a heading  line. 

Six  headings  are  allowed  for  a line  being  output  to  Teletype  while  only 
two  headings  are  allowed  per  CRT  line.  After  all  headings  have  been  output, 
MATCH  WHAT  is  called  to  check  for  matches  between  the  current  tape  record 
and  the  Retrieval  Request  WHAT  parameter.  If  a match  is  found,  the  data 
is  moved  to  a print  buffer.  Four  types  of  data  are  possible:  heading  with 

no  answer,  heading  with  alpha  answer,  heading  with  numeric  answer,  and 
heading  with  a range  of  numeric  data.  If  the  tabulate  action  is  requested, 
all  numeric  data  is  collected  and  stored  for  future  use  in  calculating  the 
Mean  and  Standard  Deviation.  The  formulae  used  in  calculating  those  are  as 
follows: 

The  Mean  of  N numbers  N 


N(N-l) 
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For  each  WHAT  heading  answer,  an  associated  social  security  number  and  date  are 
shown  with  the  data.  A sample  analyze  request  is  shown  below.  The  tabulate 
request  would  be  identical  except  for  an  omission  of  the  Mean  and  Standard 
Deviation  lines . 


- 

HEIGHT 

WEIGHT 

123-45-6789 

01JAN68 

71 

160 

234-56-7890 

10MAR68 

68.5 

150 

345-67-8901 

30MAR68 

69 

170 

- ■ 

MEAN 

69.5 

160 

SD 

2.33 

9.85 

3.3.38.2.1  Calling  Sequence 

CALL  TA00 

(for  all  data 

values  to  be 

output) 

CALL  TAA1 

(for  outputting  of  the  Mean 

and  Standard  Deviation 

REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

Saved  upon 

entry 

• 

Restored  upon  exit 

B 

Saved  upon 

entry 

Restored  upon  exit 

X 

Saved  upon 

entry 

Restored  upon  exit 

Overflow 

N/A 

N/A 
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3.3.38.2.2  General  Flow  Chart 


TAOO 
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00 

MATCH  WHAT 


< MATCHES. 

NO 

r~\ 

FOUND?^> 

^ 

it) 

|"yes 

•^ANALYZ^\ 

YES 

/ SUMS,  MATH 

REQUESTED^’ 

£ 

►<f  ETC.  , FOR 

\ ANALYZE 

^RECORD 
HEADING  = 
PREVIOUS  HEAD 
G 


MOVE  SS  NO.  & 
DATE  TO  PRINT 
LINE 


OUTPUT 

PRINT 


MOVE  DATA  TO 
PRINT  LINE 


3.3.38.3  Label  Description 
3.3.38.3.1  Local 

TAAD  a ten  word  table  containing  values  by  which  headings  are  to  be  ' 
biased  in  the  output  buffer. 

TABF  temporary  storage  location  for  the  contents  of  the  61  word  print 
output  buffer 

TABL  nine  word  table  used  to  flag  headings  which  have  been  processed  and 

o 

are  ready  to  be  output 

TACR  individual  data  field  output  character  count 

TACW  storage  location  which  contains  the  status  of  the  1/0  function  being 
performed 

TAFG  flag  which  is  set  whenever  a line  of  data  has  been  output 
TAFL  heading  location  indicator 

TANC  a seven  word  table  used  to  store  sums,  squares,  etc. 

TAOP  operand  buffer  index  counter 

TABU  flag  which  is  set  whenever  a header  line  has  been  output 

TAQN  storage  location  containing  the  number  of  the  question  being  processed 

TASA  temporary  storage  location  for  the  contents  of  the  A- register 

TASB  temporary  storage  location  for  the  contents  of  the  B- register 

TASS  an  eighteen  word  table  used  to  store  sums  of  squared  data  values  which  will 
be  used  in  the  Standard  Deviation  calculations 
TASW  storage  location  which  contains  the  status  of  the  I/O  function  being 
performed 

TASX  temporary  storage  location  for  the  contents  of  the  X- register 

TAUC  storage  location  which  is  used  to  keep  count  of  the  number  of  characters  outpu 

for  a particular  heading.  A maximum  of  eight  characters  are  allowed  per 
heading. 
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3.3.38.3.1  Local  (Continued) 

TAXC  a nine  word  table  used  to  store  various  integer  values  that  are  to 
be  converted’ to  floating  point  at  a later  time. 

TAXG  flag  which  is  set  whenever  data  has  been  found  for  a particular 
parameter 

TAXI  an  eighteen  word  table  used  to  store  sums  of  numbers  which  will  be 
used  in  the  Standard  Deviation  calculations 
TAXS  a two  word  buffer  used  to  store  miscellaneous  floating  point  data 

values 

XAXX  storage  location  for  the  contents  of  the  X- register 

3.3.38.3.2  Global 

TAPU  flag  which  is  set  whenever  a header  line  has  been  output 

3.3.38.3.3  Entry  Points  • . 

TAOO  - primary  entry  point 

TAA1  - entry  point  to  the  routine  which  calculates  and  outputs  the  Mean 
and  Standard  Deviation 

3.3.38.3o4  External  References 

3,3.38,,3.4ol  External  Labels 

CPRT  starting  address  of  the  seven  word  Request  Table 

CPTB  starting  address  of  the  Tape  Input  Buffer 

MAS1  switch  which  is  set  if  any  matched  data  has  been  found  on 

the  master 
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3.3o38.3 

MATC 

MATE 

MATM 

MATS 

MWFG 

MWXP 

PKSW 

3«3o3803« 

CDOO 

FAOO 

FLOO 

MABO 

MWOO 

OMOO 

PKOO 

SQRT 

UPOO 

$QK 


• 4,1  External  Labels  (Continued)  • .... 

storage  location  which  contains  the  number  of  coded  data 
characters  found  in  an  answer  area 

storage  location  which  signifies  where  the  decimal  is  to  be 
placed  in  a fractional  number 

starting  address  of  the  buffer  where  the  answer  data  is  stored 
storage  location  which  contains  the  sign  of  the  numeric  data 
being  processed  (O-positive,  1-negative) 

a storage  location  containing  the  tape  question  number  currently 
being  processed 

a storage  location  containing  the  beginning  address  of  the 
WHAT  Table 

switch  which  controls  into  which  half  of  a data  word  a character 
is  to  be  put 

,4,2  External  Subroutines 
Convert  and  Store  Month 
Floating  Point  to  ASCII  Conversion 
ASCII  to  Floating  Point  Conversion 
Find  Matched  Data  Routine 
Match  WHAT  Routine 
Output  Header/Data  Line 
Pack  Character 
Square  Root  Calculation 
Unpack  Character 
Floating  Point  Add 
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3.3.38.3o4.2  External  Subroutines  (Continued) 

$QL  Floating  Point  Subtract 

$QM  Floating  Point  Multiply 

$QN  Floating  Point  Divide 

$QS  Integer  to  Floating  Point  Conversion 


3.3.38.4  DETAILED  FLOW  CHART 


TAOO 


SAVE 

REGISTERS 


INITIALIZE 
FLAGS , 
COUNTERS 


/ TA96 
'clear  HEAD- 
INGS TABLE 


STORE  SPACE 


/ TA95  ' 
CLEAR  OUTPUT 
BUFFER 


STORE  SOM 


/ PKOl  \ 

J3TORE  CARRIAGE' 
\ RETURN  / 


/ TA95 
POSITION  TO 
\ 1ST  HEADING 
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3-453 


3-456 


3- 


3-458 


3-461 


3-462 


NO 

CALCULATE 
BUFFER  ADDRESS 
OF  ANSWER 

<f  PKOO 

STORE 
CHARACTER 


UPOO 
PICK  UP 
CHARACTER 


PKOl 
STORE 
CHARACTER 


INCREMENT 

CHARACTER 

COUNT 
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3-465 


TA95  \ 
SPACE  BETWEE' 
SS  NO.  AND 
DATE 


' CDOO 
CONVERT  AND 
STORE  MONTH 
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3-468 


/ PKOO  \ 
STORE  CARRIAGE 
\ RETURN  / 


/ TA95 
CLEAR  PRINT 
\ LINE 
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3.3.39  TCOO  - Trace  Condition  '■}  * - '• 

3.3.39.1  Purpose  ^ 

The  purpose  of  this  routine  is  to  trace  through  the  tree  network  in 
the  Bool  Buffer  and  return  a true  status  if  the  top  of  the  tree  is 
reached,  thus  indicating  that  the  entire  Boolean  expression  of  the 
CONDITION  response  is  true.  - .» 

3.3.39.2  Technical  Description 

Appendices  D and  C explain  in  detail  the  layout  of  the  Operand  and 
Bool  Buffers  respectively.  A thorough  knowledge  of  these  buffers 
and  the  purpose  and  function  of  BLOO  will  be  very  helpful  in  understand- 
ing the  operation  of  TCOO.  • 

An  address  (link)  from  the  Operand  Buffer  is  passed  in  the  calling 
sequence.  From  the  point  of  this  address  TCOO  begins  its  tracing  until 
one  of  two  conditions  exists:  (1)  the  null  link  (-1)  is  reached 
indicating  the  top  of  the  tree,  or  (2)  a Bool  Buffer  nodal  operation  is 
found  to  be  false. 

.Tracing  is  done  in  the  following  manner;  as  each  nodal  operation  is 
found  to  be  true,  the  link  associated  with  the  node  is  picked  up  and  the 
logical  conclusion  of  the  next  node  is  tested.  This  test  is  done  in  the 
following  manner:  the  conclusion  (left  or  right)  pointed  to  by  the  link 

is  set  true.  If  the  nodal  operator  is  OR,  the  logical  conclusion  of  the 
node  is  true.  If  the  nodal  operator  is  AND,  the  other  conclusion 
(1.e£c  or  right)  is  tested.  If  that  conclusion  is  true,  the  nodal  operation 
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3.3.39.2  Technical  Description  (Continued) 

is  true.  When  the  logical  conclusion  of  the  node  is  found  to  be  false, 
the  subroutine  returns  control  to  the  calling  routine,  two  locations 
past  the  normal  return  point.  The  normal  return  point  is  the  location 
immediately  following  the  calling  sequence  parameter. 

3.3.39.2.1  Calling  Sequence 
CALL'  TCOO , LINK 

PARAMETER  FUNCTION 

LINK  The  contents  of  LINK  is  a link  address  from  the  Operand 

Buffer. 


pirnTCTVD 

CONTENTS  UPON  ENTRY 

TTPOM 

A 

N/A 

N/A 

B 

N/A 

N/A 

X 

N/A 

N/A 

Overflow 

N/A 

N/A 
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3.3.39.3  Label  Description 

f . 

3.3.39.3.1  Local 


None 


3.3.39.3.2  Global 
None 


3.3.39.3.3  Entry  Points 
TCOO 


3.3.39.3.4  External  References 
CPBB  Bool  Buffer 
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3.3.39.4  Detailed  Flow  Chart 
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3,3*40  UP00  - Unpack  Character 

3.3.40.1  Purpose. 

UPOO  is  a subroutine  whose  purpose  Is  to  return  ASCII  characters  which 
have  been  packed  two  per  word  from  a specified  buffer  Into  the  A- register. 
The  routine  returns  one  character  per  call. 

3.3.40.2  Technical  Description 

This  routine  has  two  entry  points,  UPOO  and  UP01.  The  first  time  that  the 
routine  is  called  control  must  be  passed  to  UPOO  and  the  starting  address 
of  the  source  buffer  must  be  in  the  B- register.  For  all  subsequent  calls 
control  must  be  passed  to  UP01.  In  both  cases,  the  character  will  be 
returned  in  the  A- register. 
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3.3.40.2.1  Calling  Sequence 


CALL  UP00  (for  initial  call) 

CALL  UP01  (for  all  subsequent  calls) 


REGISTER 

CONTENTS  UPON  ENTRY 

CONTENTS  UPON  EXIT 

A 

N/A 

Unpacked  data  character 

B 


X 


Source  buffer  address  original  data  restored 

(initial  call  only) 

N/A  N/A 


N/A 


Overflow 


N/A 


3.3.40.3  Label  Description 

/ . • ■ 

3.3.40.3.1  Local 

UPBX  - starting  address  of  the  source  buffer 

UP1X  - index  into  the  source  buffer  .7. 

UPSB  - temporary  storage  location  for  the  contents  of  the  B- register 


UPSW  - switch  which  controls  from  which  half  of  a data  word  a character 
is  to  be  extracted. 


UPXX  - storage  location  initially  containing  the  starting  address  of 
the  source  buffer;  thereafter,  its  contents  are  incremented  by 
the  buffer  index. 


3.3.40.3.2  Global 
None 

3.3.40.3.3  Entry  Points 

UP00  - entry  point  for  the  first  call  to  this  routine. 

UP01  - entry  point  for  all  subsequent  calls  to  this  routine. 

3.3.40.3.4  External  References 
None 
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3.3.40.4  Detailed  Flow  Chart 
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3.3.41  $KLF  - TTY  carriage  return,  line  feed 

3.3.41.1  Purpose 

This  routine  outputs  to  the  TTY  the  specified  number  of  carriage  returns 
and  line  feeds. 

3.3.41.2  Technical  Description 

n/a  ■ ' 

3.3.41.2.1  Calling  Sequence  ' 

CALL  #KLF , CNT 

FUNCTION 

the  number  of  desired  carriage  returns  and  line 
feeds  to  be  output  to  the  TTY. 

CONTENTS  UPON  ENTRY  CONTENTS  UPON  EXIT 

destroyed 
destroyed 
destroyed 
destroyed 


PARAMETER  • 
CNT 

REGISTER 

A 

B 

X 

Overflow 


3.3.41.2.2  General  Flow  Chart 
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3.3.41.3. L Local 


3.3.41 

3.3.41 

$KLF 

3.3.41 

OZKR 


None 

3.2  Global 
None 

3.3  Entry  Points 
primary  entry  point 

3.4  External  References 

output  one  carriage  return  and  line  feed  to  teletype. 
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3. 3.41  ,,4  Detailed  Flow  Chart 
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•i.o  procram  Utilization 

Tin;  Medical  Data  Tape  Retrieval  System  (MDTRS)  is  a user  oriented 
information  retrieval  system  designed  to  provide  on-line  data  retrieval 
capabilities.  The  NASA  CAAD  UNIVAC  1108  MEDATA  system  creates  a master 
tape  containing  records  of  various  medical  information  which  is  used  as 
input  to  MDTRS.  The  user  makes  a retrieval  request  by  answering  pre- 
programmed retrieval  questions.  MDTRS  responds  to  the  retrieval  request 
by  searching  the  MEDATA  master  tape  for  the  data  satisfying  the  request 
criteria,  formatting  the  selected  data  for  output,  and  displaying  the 
data  on  the  terminal. 

4.1  COMPUTER  OPERATOR  INSTRUCTIONS 

© Load  the  MDTRS  program  from  either  paper  tape  or  magnetic  tape, 
e Turn  on  the  Magnetic  Tape  Unit, 
o Mount  the  retrieval  master  tape. 

« If  the  primary  retrieval  device  is  to  be  the  103A  modem,  it  must 
be  placed  in  AUTO  mode. 

© Begin  program  execution  at  location  zero  (0). 

« The  computer  will  respond  with  the  message: 

PLEASE  INITIALIZE  SYSTEM 
COMPUTER  CODES  ARE  AS  FOLLOWS 
D0C*A  = 1 
D0C*B  =2 
CLINC  = 3 
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4.1  COMPUTER  OPERATOR  INSTRUCTIONS  (Continued) 

DEVICE  CODES  ARE  AS  FOLLOWS 

0 = NOT  REQUIRED 

1 = CLINC  TTY#1 

2 = CL INC  TTY# 2 

3 = DOC  TTY  ’ ' ; 

4 = 103A  MODEM 

5 = CLINC  CRT  73 

6 = CLINC  CRT  74 

7 = DOC  CRT  71 

8 = DOC  CRT  74  (REMOTE) 

9 = CLINC  LINE  PRINTER 

WHAT  COMPUTER  IS  THIS  (MUST  ANSWER  1,  2,  OR  3) 

The  operator  must  input  the  proper  computer  code  at  this  time. 

© The  computer  will  then  respond  with  the  message! 

PRIMARY  RETRIEVAL  DEVICE 
(MUST  ANSWER  1,  2,  3,  OR  4) 

The  operator  must  input  the  proper  device  code  at  this  time.  Note 
that  only  device  codes  1 thru  4 are  operational  at  the  present  time. 
© After  the  device  code  has  been  input,  the  computer  will  output  the 
following  message: 

PLEASE  MOUNT  MASTER  TAPE 
TYPE  UNIT  NUMBER  (10  OR  11) 

The  operator  must  input  the  tape  unit  number  on  which  the  retrieval 
master  is  to  be  placed. 
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4.  1 COMPUTER  OPERATOR  INSTRUCTIONS  (Continued) 

e If  the  user  requests  the  COPY  option,  the  computer  wili  output 
the  message  "MOUNT  OUTPUT  TAPE  ON  UNIT  XX".  The'  operator  must 
mount  a scratch  tape  on  the  magnetic  tape  unit  not  reserved  for 
the  retrieval  master.  On  program  termination,  the  message  "DISMOUNT 
AND  LABEL  TAPE  UNIT  XX"  will  be  output,  requiring  the  operator  to 
wrapup  the  retrieval. 

4.2  OPERATIONAL  PROCEDURES 

There  are  two  processes  involved  in  retrieving:  definition  (defining  the 

specific  record(s)  or  information  of  interest)  and  action  (indicating  how 
that  information  is  to  be  retrieved  or  output).  A series  of  seven  questions 
are  posed  to  the  user.  See  Figure  1.  The  answers  entered  in  response  to 
these  questions  provide  the  definitions  of  the  record(s)  to  be  considered 
as  well  as  the  action  to  be  performed  on  the  records. 

The  first  four  questions  allow  the  user  to  identify  the  record(s)  of  interest. 
They  are  the  same  four  questions  or  headings  which  comprise  the  identifica- 
tion portion  of  all  MEDATA  records  in  the  computer,  namely  SS  NO,  RECORD, 

TYPE,  and  DATE. 

SS  NO 

The  user  may  specify  one  social  security  number  example  (SS  NO:  123-45-6709) 
or  he  may  answer  "ALL",  in  which  case  all  social  security  numbers  in  the  file 
would  be  accepted.  If  a social  security  number  is  specified,  it  must  be  in 
the  form  of  XXX-XX-XXXX,  where  X is  a digito  If  no  answer  is  given  to  this 
question,  the  "default"  condition  "ALL"  is  assumed. 
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4.2  OPERATIONAL  PROCEDURES  (Continued) 

RECORD 

The  user  may  specify  one  particular  record  of  interest  example  (RECORD: 
SURVEY)  or  he  may  answer  "ALL".  The  RECORD  response  may  not  exceed 
twenty-four  characters.  If  no  answer  is  given  to  the  question,  "ALL" 

is  assumed.  - 

TYPE 

The  user  may  specify  one  particular  type  of  record  example  (TYPE: 

LABORATORY)  or  he  may  answer  "ALL".  The  TYPE  response  may  not  exceed 
twenty-four  characters.  If  no  answer  is  given  to  this  question,  "ALL" 
is  assumed. 

DATE  • 

The  user  may  specify  one  specific  date  example  (DATE:01JAN71) , a range 
of  dates  example  (DATE: 01JAN70-04MAR71) , or  "ALL".  DATE  must  always  be 
answered  in  the  form  of  day,  month,  year  with  a three  letter  alpha  month. 

If  no  answer  is  given  to  this  question,  "ALL"  is  assumed. 

See  Figure  2 for  sample  lists. 

CONDITION 

The  fifth  retrieval  question,  CONDITION,  further  limits  the  records 
searched  to  those  containing  specific  information  so  that  the  user  may 
specify  portions  of  records  or  items  from  records  as  selection  criteria. 
These  selection  criteria  may  be  particular  heading(s)  with  or  without 
data.  The  user  indicates  whether  a particular  character  string  is  heading 
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4.2  OPERATIONAL  PROCEDURES  (Continued) 

CONDITION  (Continued) 

or  data  by  utilizing  the  colon  just  as  it  is  used  in  the  basic  file 
structure;  characters  preceding  the  colon  are  interpreted  as  heading 
and  characters  following  the  colon  are  understood  to  be  data.  The  user  may 
wish  to  specify  only  a heading  and  no  dat,  but  if  he  wishes  to  specify  a 
data  string,  it  must  always  be  preceded  by  a heading  and  colon.  The  data 
itself  may  be  either  of  two  types:  prose  or  coded.  Prose  data  is 
alphabetic  or  alphanumeric,  whereas  coded  data  is  numeric  data  and  enclosed 
in  parenthesis. 

The  CONDITION  question  offers  the  user  three  types  of  capabilities:  string 

search, - ranging,  and  Boolean  logic.  ' 

STRING  SEARCH 

If  the  user  specifies  data  as  part  of  his  selection  criteria,  and  that  data 
is  prose,  a search  is  made  of  the  data  field  corresponding  to  each  matching 
heading  in  every  pertinent  record  in  the  file  to  find  the  exact  string  of 
characters  that  the  user  has  specified.  See  Figure  3. 

In  a string  search,  prose  and  coded  data  may  not  be  mixed  in  the  same 
character  string.  For  example,  PURPOSE: (71 ) ANNUAL  must  be  retireved  in 
the  following  way:  PURPOSE: 71  AND  PURPOSE:  ANNUAL. 

Furthermore,  in  a string  search  the  user  may  not  retrieve  prose  numeric 
data  (numeric  data  not  enclosed  in  parentheses)  unless  at  least  one 
alphabetic  character  is  included.  For  example,  WEIGHT: 160  LBS  will  not 
be  retrieved  if  the  user  specifies  only  WEIGHT: 160.  He  must  include  at 
least  one  alpha  character  since  160  is  not  coded,  but  is  prose  numeric  data. 
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4.2  OPERATIONAL  PROCEDURES  (Continued) 

RANGING 

The  user  has  the  capability  to  specify  a range  of  numeric  values  as 
part  of  his  selection  criteria.  Any  record  containing  a data  value 
which  falls  within  the  range  will  be  retrieved  if  that  record  also  meets 
all  other  specifications  as  well.  Only  coded  data  will  be  searched 
under  the  ranging  selection.  See  Figure  4. 

BOOLEAN  

This  feature  adds  another  dimension  to  the  search  definition  AND/OR 
control  by  offering  the  user  the  capability  to  link  selection  parameters 
logically  together  with  the  Boolean  operators  AND  and  OR.  Several  sets  of 
headings  with  or  without  data  may  be  linked  by  these  terms  into  complex 
retrieval  requests.  AND  linkage  requires  that  both  criteria  be  met  in 
order  to  constitute  a valid  retrieval.  The  OR  linkage  is  an  inclusive 
OR  and  requires  that  either  one  or  both  of  the  criteria  be  met.  See 
Figure  5.  The  user  may  specify  no  more  than  ten  Boolean  strings  in 
response  to  the  CONDITION  and  WHAT  questions.  the  CONDITION  question  may 
be  answered  with  "NONE";  indicating  that  there  is  no  specific  selection 
criteria  within  the  body  of  the  record(s)  of  interest.  If  the  question  is 
unanswered,  "NONE"  is  assumed. 

ACTION 

The  first  five  questions  (SS  NO,  RECORD,  TYPE,  DATE  and  CONDITION) 
comprise  the  definition  segment  of  the  retrieval.  So  far,  the  computer 
has  been  told  only  which  records  are  to  be  searched.  The  sixth  question 
indicates  the  action  to  be  taken,  i»e»,  how  the  computer  is  to  output 
the  selected  information. 
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4.2  OPERATIONAL  PROCEDURES  (Continued) 

ACTION  (Continued)  / 

Valid  actions  are  LIST,  COUNT,  COPY,  TABULA IE  and  ANALYZE.  For  a 
description  of  each  output  type  see  Section  4.4.1,  Reports.  Note 
that  the  LIST  option  is  assumed  if  the  user  leaves  this  question 
unanswered. 

WHAT 

The  seventh  retrieval  question,  WHAT,  allows  the  user  to  specify  exactly 
which  items  in  the  record(s)  are  to  be  retireved  if  he  does  not  wish  to 
retrieve  the  whole  record.  The  user  may  specify  data  (including  numeric 
ranges)  as  well  as  headings.  If  the  whole  record  is  desired,  WHAT  is 
answered  with  "ALL  or  left  unanswered. 

SPECIAL  CHARACTERS 

The  three  characters  described  below  are  used  to  control  the  query  - 
response  interaction  between  the  computer  and  the  user. 

* - An  asterisk  indicates  the  final  character  of  each  of  the 
seven  answers. 

$ - The  dollar  sign  character  causes  the  current  question  to  be 
output  over  again. 

@ - The  at  sign  character  causes  the  current  retrieval  to  be  aborted. 

EXECUPORT  OPERATING  INSTRUCTIONS 
See  Appendix  H. 
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4.3  INPUT  DESCRIPTION 


MDTRS  requires  two  types  of  input,  namely;  (I)  Master  tape  records  and 
(2)  User  responses  to  questions.  MDTRS  accepts  the  tape  in  MEDATA 
format  and  extracts  any  user  requested  information  required.  The  user 
communicates  his  retrieval  request  to  the  computer  by  answering  pre- 
programmed retrieval  questions  output  by  MDTRS. 

4.4  OUTPUT  DESCRIPTION 

4,4.1  Reports 

LIST  - 

The  LIST  option  reproduces  upon  output  the  specified  record(s)  or  portions 
of  records  exactly  as  they  were  input.  The  format  in  which  the  data  is 
retrieved  is  identical  to  the  format  of  the  stored  records. 

COPY 

The  COPY  option  takes  those  records  selected  for  .retrieval  from  the 
master  tape  and  outputs  them  to  a second  magnetic  tape,  thus  allowing  the 
user  to  interrogate  a subset  of  the  master  file  as  opposed  to  interrogating 
the  larger  master  file. 


COUNT 

The  COUNT  option  displays  a count  of  all  records  which  satisfy  the  selection 
criteria  or  a count  of  specific  items  within  records.  If  the  retrieval 
question  "WHAT"  is  answered  with  "ALL",  or  left  unanswered,  all  records  which 
satisfy  the  selection  criteria  are  counted,  whereas,  if  "WHAT"  is  answered 
with  a specific  heading  or  heading/answer  pair,  that  specific  item  is  counted 
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4.4.1  Reports  (Continued) 

TABULATE 

The  TABULA1E  option  prints  out  the  specified  information  in  a tabular 
column  form.  The  headings  corresponding  to  the  tabular  columns  of  data 
are  printed  above  their  respective  columns.  Each  horizontal  line  of 
tabular  output  begins  with  the  social  security  number  and  the  date 
associated  with  that  row  of  data.  The  user  may  tabulate  coded  or  prose 
data.  See  Figure  6. 


ANALYZE 

The  ANALYZE  option  is  identical  to  TABULATE  with  one  exception.  At  the 
end  of  the  tabulation  a mean  and  standard  deviation  is  provided  for  each 
heading..  See  Figure  7. 

4.4.2  Tapes 

If  the  user  request  the  COPY  option,  the  system  creates  as  output  a 
magnetic  tape  containing  those  records  selected  for  retrieval.  This  tape 
may  itself  be  used  as  a retrieval  master  tape  for  subsequent  retrievals. 

4.4.3  Messages 
4.4.3. 1 Diagnostics 

Message  Explanation  Corrective  Measure 

ILLEGAL  CODE  Operator  has  specified  an  Input  another  code  or  tape 

incorrect  computer  code,  unit  number, 

device  code,  or  magnetic 
tape  unit  number. 
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4. 4. 3,1  Diagnostics 

Message  Explanation 

INVALID  SS  NO  User  has  requested  an 

invalid  Social  Security 
number;  possibly  an 
incorrect  format  or  an 
alpha  character  in  the 
number. 


Corrective  Measure 

Input  another  Social  Security 

number. 


INVALID  RECORD  User  has  requested  a Input  another  Record  name. 

Record  Name  which  exceeds 
twenty- four  characters. 


INVALID  TYPE  User  has  requested  a record  Input  another  Type  name. 

Type  name  which  exceeds 
twenty-four  characters. 


INVALID  DATE  User  has  requested  an  Input  another  Date. 

invalid  Date,  possibly 
due  to  an  alpha  character 
in  the  day  or  year  or  an 
invalid  format. 


INVALID  User  has  requested  an  Input  another  Condition. 

CONDITION 

invalid  Condition; 
possibly  a format. 
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4. 4. 3.1  Diagnostics  (Continued)  _ 

Message  Explanation.  Corrective  Measure 

INVALID  ACTION  User  has  requested  Input  another  Action. 

something  other  than  a 
valid  Action  (LIST, 

COPY,  TABULATE,  •• 

ANALYZE  or  COUNT). 

INVALID  WHAT  User  has  requested  an  Input  another  What. 

invalid  What  condition. 

CANNOT  ANALYZE  User  has  requested  the  Request  another  Action  or 

Analyze  action  for  different  What  parameters. 

prose  data.  ' 

ILLEGAL  A parenthesis  has  oc-  Make  correction  and  input 

PARENTHESIS 

curred  in  an  illegal  another  response  to  the 

position  in  the  answer  CONDITION  question, 

or  number  of  right 
parentheses  unequal  to 
number  of  left  paren- 
theses. 
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4. A. 3.1  Diagnostics  (Continued) 


Message 

RECORD  BAD- 
SKIPPED 


TAPE  ERROR 
RECORD  SKIP 


NO  ANSWER  WITH 
COLON 


TOO  MANY 
PARAMETERS 


Explanation 
There  is  some  illegal 
data  on  the  record  being 
processed.  The  tape  is 
advanced  to  the  next 
record  and  the  bad  record 
is  disregarded. 

The  computer  is  unable  to 
read  a master  tape  record. 
The  tape  is  advanced  to 
the  next  record  and  the 
bad  record  disregarded. 

A WHAT  or  CONDITION 
heading  followed  by  a 
colon  has  been  found,  but 
no  answer  following  the 
colon  has  been  specified. 

Too  many  WHAT  parameters 
specified  for  the  request- 
ed output  device  for  the 
ANALYZE  or  TABULATE 
option. 


Corrective  Measure 
None  required. 


None  Required. 


Make  correction  and  input 
another  response  to  the 
question  in  error. 


Make  correction.  Only 
five  headings  are  allowed 
for  the  teletype  or  103A 
Modem. 
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4. 4.3. 2 Advisory /System  Queries 

Message  User  Action 

OUTPUT  COMPLETE  Output  for  this  request  is  complete.  User  may 

key  in  new  request  if  desired. 

No  user  action.  These  are  the  corresponding  code 
numbers  of  the  computers  on  which  the  retrieval 


DOC*A  = 1 
DOC*B  = 2 
CL INC  = 3 


may  take  place. 


PLEASE  INITIALIZE 
SYSTEM  COMPUTER  CODES 
ARE  AS  FOLLOWS 


DEVICE  CODES  ARE  AS  No  user  action.  These  are  the  primary  retrieval 

FOLLOWS 

device  codes. 

0 = NOTE  REQUIRED 

1 = CLINC  TTY  #1 

2 = CLINC  TTY  #2 

3 = DOC  TTY 

4 = 103A  MODEM 

5 = CLINC  CRT  73 

6 = CLINC  CRT  74 

7 = DOC  CRT  71 

8 = DOC  CRT  74  (REMOTE) 

9 = CLINC  LINE  PRINTER 


WHAT  COMPUTER  IS  THIS  Operator  must  specify  on  which  computer  the 
(MUST  ANSWER  1 , 2 

°k  3)  retrieval  is  taking  place  (see  above  for  computer 

codes). 


PRIMARY  RETRIEVAL  Operator  must  specify  on  which  primary  1/0  device 

DEVICE  (MUST  ANSWER 

1,  2,  3 OR  4)  the  retrieval  is  taking  place  (see  above  for  device 

codes).  Presently  only  codes  1 thru  4 are  operational. 
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4.4.3. 2 Advisory/Sysi 
Message 

PLEASE  MOUNT  MASTER 
TAPE  TYPE  UNIT  NUMBER 
(10  OR  11) 


SYSTEM  INITIALIZED 
READY 


MTU  IS  NOT  READY. 
AFTER  YOU  READY  MTU, 
PROGRAM  WILL  CONTINUE 


PUT  MAG  TAPE  UNIT(S) 
ON  LINE 


SS  NO: 


RECORD: 


TYPE: 


Queries  (Continued) 

User  Action 

Operator  must  specify  the  unit  number  of  the  tape 
drive  on  which  the  master  file  tape  has  been  mounted. 

No  user  action  required.  The  system  has  been 
initialized  properly  and  the  user  may  now  input  his 
retrieval  request. 

Ready  the  magnetic  tape  unit  on  which  the  retrieval 
master  tape  is  mounted. 


Due  to  a power  failure,  the  magnetic  tape  units  must 
be  initialized  to  an  on-line  status.  This  is  done  b 
pressing  LOAD  twice  and  ON  LINE  once. 


J 


User  must  specify  one  Social  Security  number  on 
which  he  wants  to  retrieve  data  or  he  may  answer 
"ALL"  which  tells  the  computer  to  accept  all 
Social  Security  numbers  in  the  file. 

) 

User  must  specify  one  Record  name  on  which  he 
wants  to  retrieve  data  or  he  may  answer  "ALL". 

User  must  specify  one  record  TYPE  on  which  he 
wants  to  retrieve  data  or  he  may  answer  "ALL". 
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. A . 3 . 2 Advi  sory/Systci 
Message 
DATE: 


CONDITION: 


ACTION: 


WHAT: 


RETIREVAL  WORJKING 


RETRIEVAL  ABORTED 
OUTPUT  TERMINATED 


POWER  FAILURE . PLEASE 
RESTART  REQUEST  ****** 


Queries  (Continued) 

User  Action • 

User  must  specify  one  date,  A range  of  dates, 
or  "ALL"  dates  on  which  he  wants  to  retrieve  data. 

User  must  specify  the  condition  parameter(s)  on 
which  he  wants  to  retrieve  data. 

User  must  specify  the  action  (COPY,  COUNT,  LIST, 
TABULATE,  or  ANALYZE)  he  wants  taken  on  the 
retrieved  data. 

User  must  specify  upon  what  parameters ) he 
wants  the  above  action  taken. 

No  user  response  necessary.  The  retrieval  is  in 
progress. 

No  user  action  required.  This  message  occurs  when 
the  user  has  voluntarily  aborted  the  retrieval 
currently  in  progress  by  pressing  the  @ key. 

Power  failure  has  occurred.  User  must  re-enter  the 
retrieval  request. 
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User  Action 


4.4. 3.2  Advisory /System  Queries  (Continued) 

/ 

/ • 

Message 

CRT  NOT  READY  No  user  action  required.  The  program  will 

continue  ignoring  the  last  1/0  request. 

PARITY  ERROR  No  user  action  required.  The  program  will 

continue,  ignoring  the  last  1/0  request. 

MODEM  DISCONNECTED  No  user  action  required.  The  program  will  continue 

ignoring  the  last  I/O  request. 

4.5  RESTRICTIONS 

e Due  to  space  limitations,  a maximum  of  five  headings  for  the  teletype 
are  allowed  as  WHAT  answer  responses  when  the  TABULATE  or  ANALYZE 
actions  are  requested. 

® The  user  may  not  specify  a range  or  a serise  of  Social  Security  numbers 

» The  user  may  specify  only  one  type  of  data  per  heading.  In  a string 
search,  prose  and  coded  data  may  not  be  mixed  in  the  same  character 
string.  For  example, 

PURPOSE: (71 )ANNUAL  must  be  retrieved  in  the  following  way: 

PURPOSE : 71  AND  PURPOSE: ANNUAL. 
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Function 


Question 


Answer 


1. 

SS  NO 

■ r: 

WHO? 

Search 

2. 

RECORD 

= 

WHAT  group  of  records? 

Criteria 

3. 

TYPE 

' = 

WHAT  subset  of  that  group 
of  records 

4. 

DATE 

= 

WHEN? 

5. 

CONDITION 

= 

WHAT  limitations  narrow 
that  subset? 

Type  of  retrieval 

6. 

ACTION 

= 

HOW  are  these  items  to  be 
output? 

Retrieval  parameters 

7. 

WHAT 

= 

WHAT  specific  items  are  to 
be  output? 

FIGURE  4-1  - SEVEN  RETRIEVAL  QUESTIONS 
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RECORD: 

TYPE: 

DATE: 

SS  NO: 
RECORD: 
TYPE: 
DATE: 

SS  NO: 
RECORD: 
TYPE: 
DATE: 

SS  NO: 
RECORD: 
TYPE: 
DATE: 


SURVEY 

LABORATORY 

01FEB69 

ALL 

ALL 

FAMILY  HISTORY 
01JAN70  - 0IMAR70 

234-56-7891 

ALL 

PE 

ALL 

345-67-8912 

SURVEY 

ALL 

30MAR70 


FIGURE  4-2  - SAMPLE  IDENTIFICATION  LISTS 


SAMPLE  RETRIEVAL  REQUEST 


SS  NO 

111-11-1111* 

RECORD  / 

- . 

REPORT* 

TYPE 

EKG* 

DATE 

01JAN69* 

CONDITION 

PURPOSE ‘.APOLLO  13* 

ACTION 

LIST* 

WHAT 

ALL* 

SAMPLE  RETRIEVAL  OUTPUT 


111-11-1111  REPORT 

EKG  01JAN69 

NAME: 

DOE,  JOHN 

PURPOSE: 

APOLLO  13  F- 5 

MEASUREMENTS 

>• 

RHYTHM : 

C AAA  ) 

RATE: 

(xxx) 

INTERVALS 

P-R: 

(xxx) 

QRS: 

(xxx) 

QT: 

(xxx) 

AXIS: 

(xxx) 

DESCRIPTIONS 

LIMB  LEADS 

xxx 

PRECORDIAL  LEADS: 

xxx 

INTERPRETATION : 

xxx 

COMMENTS: 

xxx 

EXAMINER: 

xxx 

FIGURE  4-3  - CHARACTER  STRING  SEARCH 
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SS  NO 

ALL* 

RECORD 

• SURVEY* 

TYPE 

MEASUREMENT* 

DATE 

ALL* 

CONDITIONS 

WEIGHT: 150- 200* 

ACTION 

LIST* 

WHAT 

ALL* 

FIGURE  4-4  - SAMPLE  RANGING 
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ALL* 


SS  NO 
RECORD 
TYPE 
DATE 

CONDITIONS 


ACTION 

WHAT 


REPORT* 

LABORATORY* 

ALL* 

EXAM: HEMATOLOGY  AND  PURPOSE: APOLLO  13 
AND  WBC: 3800- 4400  AND 
(HB: 15-16  OR  HCT:0-45)* 

LIST* 

ALL* 


FIGURE  4-5  - SAMPLE  BOOLEAN 
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SAMPLE  RETRIEVAL  REQUEST 


SS  NO 

ALL* 

RECORD 

SURVEY* 

TYPE 

MEASUREMENT* 

DATE 

15JAN69- 15MAR69* 

CONDITIONS 

NONE* 

ACTION 

TABULATE* 

WHAT 

HEIGHT  AND  WEIGHT 

SAMPLE  RETRIEVAL  OUTPUT 


HEIGHT 

123-45-6789 

23JAN69 

70.50 

456-78-9123 

3FEB69 

68.75 

678-23-4567 

- 15MAR69 

68.00 

FIGURE  4-6  - SAMPLE  TABULATE 


AND  BUILD  AND  TEMP: 99-100 


WEIGHT  BUILD  TEMP 

175.00  MEDIUM  99 

167.00  MEDIUM  99 

152.00  SMALL  100 
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SAMPLE  RETRIEVAL  REQUEST 


SS  NO 

. 111-11-1111* 

RECORD 

SURVEY* 

TYPE 

MEASUREMENT* 

DATE 

ALL* 

CONDITIONS 

WEIGHT* 

ACTION 

ANALYZE*  • 

WHAT 

ALL* 

SAMPLE  RETIREVAL  OUTPUT 


WEIGHT 

111-11-1111 

01JAN68 

180 

1 1 1 - 11-1111 

OIFEB68 

181 

111-11-1111 

01MAR68 

183 

1 - 
1 

01APR68 

180 

111-11-1111 

01SEP68 

185 

MEAN 

181.8 

SD 

2.46 

FIGURE  4-7  - SAMPLE  ANALYZE 
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APPENDIX  A 


TAPE  DESCRIPTION 


FIGURE  A- 1 MASTER  FILE  STRUCTURE 
MASTER  FILE 

The  Master  File  is  composed  of  N records  of  variable  length,  not  to  exceed 
2880  words.  At  the  end  of  the  data  a special  end  of  file  record  is  written 
to  avoid  any  incompatibility  between  drives  that  would  prevent  the  hardware 
end  of  file  from  being  recognized. 
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MASTER  FILE  INFORMATION 


The  Master  File  information  is  made  up  of  three  parts:  Heading,  Answer, 

and  Level  Code.  The  Heading  is  that  background  data  that  asks  a question 
(e.g. , Blood  Pressure,  Temperature,  etc.).  In  some  cases,  however,  it 
merely  identifies  the  category  of  the  Headings  (or  questions)  to  follow 
(e.g.,  Cardiovascular,  Musculoskeletal,  etc.).  The  Answer  is  the  response 
made  to  the  question.  This  response  may  be  narrative  or  numeric  (coded) 
data.  The  Level  Code  defines  the  relationship  among  all  the  Headings  and 
Answers  on  a record.  The  use  of  Level  Codes  breaks  down  a particular  record 
into  paragraphs  of  related  information. 
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FIXED  LENGTH 
IDENTIFICATION 


- VARIABLE  LENGTH 
BODY  (IQUES) 


FIGURE  A- 2 RECORD  STRUCTURE 
DATA  RECORD 

A data  record  consists  of  a Fixed  Length  Identification  and  Variable  Length 
Body.  FIGURE  A-2  illustrates  the  organization  of  a record.  The  segments 
are  identified  by  mnemonics  which  were  used  in  addressing  these  same 
segments  in  the  original  MEDATA  programs.  Six  of  the  seven  segments  of  a 
record  are  composed  of  word  blocks  and  their  size  in  words  is  specified  in 
the  parenthesis  following  each  mnemonic.  The  number  following  the  parenthesis 
is  the  number  of  blocks  in  each  segment  of  the  Identification.  (The  blocks 
of  the  segment  IANS  are  variable  length.  ) The  number  of  blocks  in  each 
segment  of  the  Body  is  dependent  upon  the  contents  of  the  IQNDEX  segment. 

IQNDEX 

This  segment  of  the  Identification  is  a number  that  specifies  the  total  number 
of  Headings  that  are  found  in  the  record.  All  records  have  at  least  eight 
Headings,  so  IQNDEX  will  be  greater  than  eight. 


IANDEX 


This  segment  of  the  Identification  specifies  the  length  of  the 
segment  IANS.  ' . 

ID  - 

The  ID  segment  is  made  up  of  four  36-word  blocks.  These  blocks  contain 
the  Answers  to  the  first  four  Headings  of  a record.  These  Headings  are: 

SS  NO,  RECORD,  TYPE,  and  DATE.  The  Answers  begin  in  the  fourth  word  of 
the  block. 

IQ 

This  segment  of  the  Body  contains  all  the  Headings  of  the  record,  one  in 
each  twelve  word  block.  The  number  of  blocks  is  equel  to  the  value  In  the 
IQNDEX  segment, 

LCQ 

This  segment  of  the  Body  contains  the  Level  Codes  which  are  found  in  the 
third  word  of  each  three  word  block.  The  number  of  blocks  is  equal  to 
the  value  in  the  IQNDEX  segment. 

IFWAA 

This  segment  of  the  Body  contains  pointers  relative  to  the  beginning  of 
the  IANS  segment.  These  pointers  address  the  beginning  of  each  respective 
Answer  to  the  Heading  in  IQ.  The  number  of  three  word  blocks  is  equal 
to  the  value  in  the  IQNDEX  segment. 
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<o<&- 


IANS 


This  segment  of  the  Body  is  made  up  of  variable  length. blocks  which 
contain  the  Answers  associated  with  the  Headings  in  IQ.  There  are  three 
types  of  data  allowed  in  IANS  and  they  have  priorities: 

(1)  date  data  ' 

(2)  numeric  data 

(3)  narrative  data 

The  date  is  a fixed  length  of  seven  characters  and  is  preceded  by  an  equal 
sign.  The  narrative  data  is  variable  in  length  and  is  always  preceded  by 
a colon.  The  numeric  data  is  found  between  the  two,  and  is  also  variable 
in  length. 
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END-OF- FILE- RECORD 


The  end-of-file  record  has  an  IQNDEX  value  of  one.  This  is  the  only 
record  on  the  entire  record  with  such  a value. 
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APPENDIX  B 


REQUEST  TABLE  ' 

The  Request  Table  is  a seven  word  buffer  that  correlates  each  Request  question 
either  to  some  location  in  memory  where  the  user  response  is  saved,  or  to  a 
flag  which  represents  certain  standard  responses.  The  seven  Request  questions 
are: 

SS  NO 
RECORD 
TYPE 
DATE  . 

CONDITION 

ACTION 

WHAT 

Responses  are  saved  in  the  Request  Buffer,  and,  for  the  first  four  questions, 
the  Request  Table  relates  directly  to  this  buffer  through  pointers.  These 
pointers  are  indices  into  the  buffer,  and  they  locate  the  beginning  of  each 
saved  response. 

The  fifth  and  seventh  questions  relate  indirectly  to  the  Request  Buffer  in 
that  they  point  to  a location  in  the  Operand  Buffer  whose  contents  addresses 
the  saved  response  in- the  Request  Buffer. 

STANDARD  RESPONSES 

All  the  responses  to  the  sixth  question  and  one  response  to  the  other 
questions  are  called  standard  responses.  In  the  case  of  these  responses 
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the  Request  Table  location  contains  a flag  rather  than  a pointer. 

The  standard  responses  are:  - 

• SS  NO:  ALL* 

RECORD:  ALL* 

TYPE:  ALL* 

DATE:  ALL* 

CONDITION:  NONE* 

ACTION:  LIST,  COPY,  COUNT,  TABULATE , OR  ANALYZE* 
WHAT:  ALL* 

The  flags  for  each  of  these  responses  are: 

ALL  = 0 

NONE  =0 
LIST  =0 
COPY  =1 
COUNT  =2 
TABULATE  =3 
ANALYZE  = 4 

DEFAULT  RESPONSES 

If  no  response  is  given  to  a question,  the  standard  response  whose  flag 

is  zero  is  assumed  as  follows: 

SS  NO:  ALL* 

RECORD:  ALL* 

TYPE:  ALL* 

DATE:  ALL* 

CONDITION:  NONE* 

ACTION:  LIST* 

WHAT:  ALL* 

See  FIGURES  3-1,  3-2,  and  3-3  for  examples  of  the  Request  Table. 
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APPENDIX  C 


7 

BOOL  BUFFER 

The  Bool  Buffer  consists  of  several  nodes.  Each  node  is  made  up  of 
four  parts:'  left  conclusion,  right  conclusion,  operator,  and  link. 


15  65  32  0 




LEFT 

CONCLUSION 

OPERATOR 

RIGHT 

CONCLUSION 

LINK 

The  node  is  two  memory  locations  which  represent  a simple  Boolean 
expression,  which  is  an  experession  in  Boolean  algebra  that  consists  of 
one  operator  and  two  operands  (however,  the  operand  may  itself  be  a 
simple  expression).  The  logical  conclusion  of  any  node  is  the  Boolean 
result  of  the  nodal  operation  of  that  node.  r 

The  link,  the  second  word  in  a node  (node  1),  is  a pointer  to  another 
node  (node  2).  If  the  link  of  node  1 addresses  the  first  word  or  second 
word  of  node  2,  then  node  1 represents  the  left  operand  or  right  operand, 
respectively,  of  node  2.  Thus,  if  the  logical  conclusion  of  node  1 is 
found  to  be  true,  and  if  the  link  of  node  1 addresses  the  second  word 
of  node  2,  then  the  right  conclusion  of  node  2 must  be  set  true.  FIGURE  3-3 
is  a diagram  of -the  relation  of  the  Bool  Buffer  to  a Retrieval  Request. 
Section  3.3.1  gives  a thorough  description  of  how  the  links  are  created  in 
the  Bool  Buffer,  and  Section  3.3.39  describes  the  use  of  this  buffer  in 
evaluating  a Boolean  expression. 
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, OPERAND  BUFFER 

The  Operand  Buffer  is  a buffer,  forty  words  in  length,  that  is  utilized 
in  two-word  sets.  Each  set  contains  two  pointers;  the  first  pointer 
addresses  the  Request  Buffer  and  the  second  links  to  the  Bool  Buffer. 

The  responses  to  the  Retrieval  Request  questions  CONDITION  and  WHAT  may 
consist  of  a Boolean  expression,  where  the  operand  of  the  expression  is 
saved  in  the  Request  Buffer,  and  a coded  version  of  the  operator  is  saved 
in  the  Bool  Buffer.  To  maintain  the  original  form  of  the  expression,  the 
Operand  Buffer  is  used  to  link  each  operand  to  an  operator. 

See  FIGURES  3-2  and  3-3  for  a diagram  of  the  relation  of  the  sets  in  the 
Operand  Buffer 


POINTER  TO  OPERAND 
IN  REQUEST  BUFFER 

LINK  TO  OPERATOR 
IN  BOOL  BUFFER 
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REQUEST  BUFFER 

The  Request  Buffer  (CPRB)  is  a 480  word  buffer  into  which  all  non- 
standard responses  are  saved  (see  Appendix  B for  explanation  of  standard 
responses).  The  data  is  packed  two  ASCII  characters  per  word,  with  all 
blanks  removed. 

SS  NO 

The  response  to  the  first  question  in  the  Retrieval  Request  (SS  NO)  is 
saved  in  the  first  six  locations  of  the  Request  Buffer,  unless  there  is  no 
response  or  the  standard  response  ALL  is  found.  This  response  is  not 
terminated  by  the  terminal  character  (177  ) as  is  the  case  with  other 

* O 

responses o 


RECORD  and  TYPE 

If  a non-standard  response  is  made  to  the  second  and/or  third  questions 

of  the  Retrieval  Request,  it/they  will  be  saved  beginning  at  the  next 

available  new  word  boundary.  The  last  character  in  both  cases  will  be 

the  terminal  character©  (177  ). 

8 

DATE 

The  non-standard  response  to  the  fourth  question  of  the  Retrieval  Request 
will  be  one  of  two  forms:  a single  data  or  two  dates  representing  a 

range  of  dates.  If  a single  date  is  the  response,  the  data  is  stored 
beginning  at  the  next  available  word  boundary,  and  a terminal  character 
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APPENDIX  E (Continued 

DATE  (Continued 

is  stored  at  the  end.  If  two  dates  are  input,  both  begin  at  the  next 
available  word  boundary,  and  end  with  a terminal  character.  ■■ ' 

CONDITION  and  WHAT 

Non-standard  responses  to  the  fifth  and  seventh  questions  of  the  Retrieval 
Request  may  be  one  of  four  forms: 

(1)  Heading  alone  _ ..  . 

(2)  Heading  plus  alpha  Answer 

(3)  Heading  plus  numeric  Answer 

(4)  Heading  plus  a range  of  numeric  Answer. 

In  each  case  the  Heading  is  stored  beginning  at  the  next  available  word 
boundary,  and  terminated  with  a terminal  character.  For  the  second  and 
third  forms  the  Answer  is  also  begun  on  a new  word  boundary  and  ended 
with  a terminal  character.  For  the  fourth  form  each  Answer,  representing 
the  upper  and  lower  limit  of  the  range,  is  stored  in  the  same  manner  as 
the  second  and  third  forms. 

ACTION 

All  responses  to  the  sixth  question  of  the  Retrieval  Request  are 
standard  responses,  and  since  only  non-standard  responses  are  stored  in 
the  Request  Buffer,  the  response  to  this  question  is  not  saved. 

See  FIGURES  3-1,  3-2,  and  33  for  diagrams  of  the  Request  Buffer. 
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CONDITION  TABLE 

The  Condition  Table  is  broken  down  into  one,  two,  or  three  word  sets.  The 
first  word  of  each  set  is  a flag  and  is  associated  with  one  operand  in  the 
response  to  the  fifth  question  of  the  Retrieval  Request,  CONDITION.  This 
response  may  be  made  up  of  several  operands  and  they  may  be  one  of  four 
different  forms: 

(1)  Heading  alone  

- (2)  Heading  plus  alpha  Answer 

(3)  Heading  plus  numeric  Answer 

(4)  Heading  plus  a range  of  numeric  Answer. 

HEADING  ALONE 

If  the  operand  is  a Heading  alone,  the  Condition  Table  will  supply  one 
word  whose  contents  is  zero. 

HEADING  PLUS  ALPHA  ANSWER 

The  set  associated  with  this  form  of  operand  is  two  words.  The  first 
word  is  a flag  of  one;  the  second  word  is  a pointer  to  the  beginning  of 
the  Answer  in  the  Request  Buffer. 

HEADING  PLUS  NUMERIC  ANSWER 

The  set  associated  with  this  form  of  operand  is  two  words.  The  first  word  is 
a flag  of  two;  the  second  word  is  a pointer  to  the  beginning  of  the  Answer 
in  the  Request  Buffer. 
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HEADING  PLUS  A RANGE  OF  NUMERIC  ANSWER 

The  set  associated  with  this  form  of  operand  is  three  words.  The  first 
word  is  a flag  of  three;  the  second  and  third  words  are  pointers  to  the 
lower  limit  and  upper  limit  respectively  of  the  Answer  stored  in  the 
Request  Buffer 


SUMMARY 

FORM . FLAG 

Heading  alone  ® 

Heading  plus  alpha  Answer  1 

Heading  plus  numeric  Answer  2 

Heading  plus  range  of  numeric  _ 3 

Answer 


NO.  OF  WORDS  IN  SET 
1 
2 
2 
3 


See  FIGURE  3-3  for  a diagram  of  the  Condition  Table. 
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APPENDIX  G 
/ , WHAT  TABLE 

The  format  of  the  What  Table  is  the  same  as  the  Condition  Table  (see 
Appendix  F). 

See  FIGURES  3-3  for  a diagram  of  the  What  Table. 
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READYING  THE  EXECUPORT  300  RETRIEVAL  SYSTEM 

If  the  computer  has  not  already  been  readied,  call  713-483-4796  or 
Philco  at  713-488-1270,  X-564  and  have  the  Retrieval  System 
initialized  for  remote  terminal  use. 

Lift  the  lid  of  the  Execuport  300  and  position  the  five  switches 
at  the  front  as  follows: 


MODE 

Line 

DUPLEX 

Full 

CHAR/SEC 

30 

PARITY 

Odd 

QSL 

Upper 

Turn  on  Execuport  300. 

From  any  telephone  dial  713-483-6260  and  wait  for  a continuous 
high-pitched  tone.  This  should  come  after  one  ring. 

Insert  the  telephone  receiver,  with  the  cord  toward  the  front,  into 
the  receptacle  on  the  side  of  the  ExecupoYt  300.  Make  certain  that 
the  receiver  is  secure. 

Wait  for  the  "Ready"  light,  on  the  left  front  panel,  above  the  key- 
board of  the  Execuport  300  to  come  on. 

Type  in  "@".  This  will  begin  the  output  of  the  seven  retrieval 


request- quest ions. 
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IQ  RECORD 


P D A T E D 


ROC 


E S T NO 


COMMENTS 


REPORT 
CP  LAB 
0 0 0 0 7 0 


S S NO 


DATE 


TYPED 


E K G 


ROUTINE 


COMMENTS 


TYPE 


COR 


NAME 


8 0 0 0 0 0 4 


DIAGNOSES 


EXERCISE 


X A M I N E R 


LCQ 


IANS  : / 7 0 0 8 0 4 


66:  / 000000 


WAS  NO  DIAGNOSIS  : 


/ 0 0 0 0 0 0 

: T H E R E 
PATIENT  WAS 


NOT  VERY  ACTIVE  FOR  A MAN  HIS  AGE 


: HAROLD  KINGHAM 


SAMPLE  INPUT  (Continued) 
SAMPLE  REQUESTS 


SS  NO:  * 

RECORD:  REPORT* 

TYPE:  LABORATORY* 

DATE:  * 

CONDITION:  EXAM: SERUM* 
ACTION:  * 

WHAT:  * 


SS  NO:  * 
RECORD:  * 

TYPE:  * 

DATE:  * 
CONDITION:  * 
ACTION:  COUNT* 
WHAT:  * 


SS  NO:* 

RECORD:  REPORT* 

TYPE:  LABORATORY* 

DATE:  * 

CONDITION:  EXAM: SERUM* 

ACTION:  TABU* 

WHAT:  GLU  AND  SGOT  AND  A1  AND  A2  AND  B* 


SS  NO:  * 

RECORD:  REPORT* 

TYPE;  LABORATORY* 

DA  IE:  * 

CONDITION:  EXAM: SERUM  AND  GLU: 70- 80* 
ACTION:  ANALYZE* 

WHAT:  GLU  AND  SGOT  AND  A1  AND  A2  AND  B* 


SS  NO:  111-22-3333* 

RECORD:  REPORT* 

TYPE:  LABORATORY* 

DATE:  01JUN72-09SEP7A* 

CONDITION:  EXAM : UA  RANDOM  OR  (EXAM: SERUM  AND  GLU  :70-80) 
ACTION:  LIST* 

WHAT:  EXAM  AND  NAME  AND  GLU* 
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SAMPLE  INPUT  (Continued) 


DEFAULT 


SS  NO:* 

RECORD:* 

TYPE:* 

DATE : * 
CONDITION:* 
ACTION:* 
WHAT: * 


ID  LIST 

SS  NO:* 

RECORD:* 

TYPE:* 

DATE:* 
CONDITION : * 
ACTION:* 

WHAT:  ID  ONLY* 
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SAMPLE  OUTPUT 
LIST 

111-22-3456  REPORT  LABORATORY  10JUN71 

UPDATED 

COR 

TYPED:  000000 

PROC:  710706 

NAME: 


PERMANENT  BASE: 

KSC 

PURPOSE: APOLLO  15 

SURVEILLANCE  PC 

SEX:M 

B1RTHYEAR: 

(TF) 

CATEGORY : COMPLETE 

EXAM: SERUM 

SEROLOGY 

CRP: 

POS 

HEMATOLOGY 

HCT: 

(36)PCT 

WBC: 

( 10300 )CU  MM 

DIFF 

NEUT: 

(79|l)CU  MM 

LYMPH: 

(2163)CU  MM 

MONO: 

(O)QU  MM 

EO: 

( 206 )CU  MM 

BASO: 

(0)CU  MM 

BANDS: 

(0)CU  MM 

MORPH: MOD.  HYPOCHROMIA 

CHEMISTRY 

! 

GLU: 

(74)MG  PCT 

SGOT: 

(13)MU/ML 

BUN: 

(21)hfe  PCT 

URIC  ACID: 

(5.9 )MG  PCT 

ALK  PHOS: 

( 28)IU 

CREATININE: 

(1.8)MG  PCT 

LDH: 

(253)MU/ML 

ELECTROPHORESIS 

PROTEIN: 

(7.1 )GM  PCT- 

ALBUMIN: 

(4.0)GM  PC 

GLOBULIN 

Al: 

(0. 3)GM  PCT 

A2: 

(0.9)GM  PCT 

B: 

(l.O)GM  PCT 

G: 

(0. 8)GM  PCT 

OTHER: 

COMMENTS: 
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SAMPLE  OUTPUT  (Continued) 

•/ 

/ ' 


COUNT 


COUNT  IS  0362 


TABULATE 


GLU 

SPOT 

A1 

A2 

B 

111-11-1111 

10JUN71 

74 

13 

.3 

.9 

1.0 

222-22-222 

07JUL71 

108 

15 

.2 

.5 

.7 

333-33-3333 

11JUN71 

106 

12 

.1 

.5 

.8 

444-44-4444 

08JUN71 

100 

15 

.2 

.6 

.9 

555-55-5555 

07JUN71 

92 

12 

.1 

.5 

.8 

666-66-6666 

22JUN71 

132 

18 

.3 

.7 

.8 

777-77-7777 

22JUN71 

132 

18 

.3 

.7 

.8 

ANALYZE 


/ 


/ 


GLU 


111-11-1111 

10JUN71 

74 

222-22-2222 

09JUL71 

94 

333-33-3333 

16JUN71 

94 

444-44-4444 

16JUN71 

116 

555-55-5555 

08JUN71 

98 

666- 66- 6666 

10JUN71 

90 

777-77-7777 

10JUN71 

80 

MEAN 

92.28523 

SD 

13.48640 

SGOT  A1  A2  B 

13  .3  .9  1.0 

20  . 2 .6  1.0 

10  .1  .5  1.0 

14  .3  .6  1.1 

16  . 2 .8  1.0 

18  .2  .6  1.0 

15  .3  .8  1.0 

15.14262  .2281945  .6845840  1.014264 

3.287307  .0754685  .1461453  .037742 
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